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Si quieres recibir por correo certificado estas cassettes garantizadas recorta o copia este boletín y envíalo hoy mismo: 

Nombre y apellidos 
Dirección 

Población CP Prov. Tel.: 

□ KRYPTON 

□ U BOOT 

□ LORD WATSON 

□ LOTO 

□ SNAKE 

□ EL SECRETO DE LA PIRAMIDE 



Ptas. 500,- 
Ptas. 700- 
Ptas. 1.000 - 
Ptas. 900 — 
Ptas. 600- 
Ptas. 700- 



CP 

□ STAR RUNNER 

□ TEST DE LISTADOS 

□ HARD COPY 

□ MATA MARCIANOS 

□ DEVIL'S CASTLE 

□ FLOPPY 



Prov. 

Ptas. 1.000,— 
Ptas. 500 — 
Ptas. 2.500 — 
Ptas. 900,— 
Ptas. 900- 
Ptas. 1.000,- 



□ MAD FOX 

□ VAMPIRO 

□ SKY HAWK 

□ tnt 

□ quinielas 



Ptas. 1.000- 

Ptas. 800 — 

Ptas. 1.000,— 

Ptas. 1.000 — 

Ptas. 1.000- 



|^ Castos de envío certificado por cada cassette Ptas. 70 - Remito talón bancario de Ptas. A la orden de Manhattan Transfer, S. A. 

ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. IMPORTANTE: Indicar en el sobre MSX CLUB DE CASSETTES. ROCA I BATLLE, 
10-12 BAJOS. 08023 BARCELONA. Para evitar demoras en la entrega es imprescindible indicar nuestro código postal. 



NLESTRAS CASSETTES 



QL I0SC0S. LA FORMA DE ADQUIRIRLAS ES SOLICITANDOLAS A NUESTRA REDACCION: ;\0 SE ADMITE CONTRA REEMBOLSO! 




PIRATAS 



Pese a que la baja de precios 
del software original acaecida en 
los últimos meses presagiaba una 
disminución en el volumen de la 
piratería en nuestro país, esto no 
ha sido así. 

La esperada ley sobre la pro- 
piedad intelectual no acaba de 
llegar y, de esta forma, el caldo 
de cultivo para los piratas infor- 
máticos sigue siendo idóneo. 

Como en todos los ámbitos de 
la actividad humana, siempre hay 
quien intenta aprovecharse del 
trabajo ajeno y, de esta forma en- 
riquecer sus erarios con el sudor 
de otros. Pero en el caso de la pi- 
ratería de software el problema 
es mucho mayor. Personas que 
nunca sustraerían un programa 
original de unos grandes almace- 
nes lo hacen alegremente acogi- 
dos al hecho de la piratería. Des- 
graciadamente la conciencia 
social en este aspecto parece no 
estar todavía desarrollada, de 
modo que, personas intachables 
en otros aspectos, no dudan en 
autocalificarse como piratas, o en 
comentar a sus amistades que 
acaban de conseguir una copia 
del último programa de moda. 
¿Serían capaces, acaso, de sor- 
prender a sus amistades con el 
robo del último modelo de radio- 
cassette? 

La solución al problema de la 
piratería, pues, no está en la per- 
secución penal de los infractores, 
sino en la concienciación de los 
usuarios de que están promo- 
viendo alegremente una actividad 
ilegal y delictiva. 
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Monitor al día 



Un producto U.S. Gold 




PHASOR ONE: 
N. s UNO EN EUROPA 

Nos informa nuestro colaborador 
en Londres Alan Graham, so- 
bre el importantísimo éxito que 
el joystick Phasor One de la firma U.S. 
Gold, está consiguiendo en todos los 
mercados europeos. Ergonómico, ligero 
y con un funcionamiento de lo más sen- 
cillo. A los que no conocéis las grandes 
cualidades de este periférico, os remiti- 
mos al Especial Software de nuestra re- 
vista hermana, MSX Extra, en el que 
aparece un completo banco de ensayo 
sobre este fenomenal control. MSX Ex- 
tra Especial Software, ya está en todos 
los quioscos del país desde principios de 
enero. 



OUT RUN, EN MSX 

En los Estados Unidos, existe un 
videojuego de salón que causa fu- 
ror. Su nombre: Out Run. Muchos 
lo conoceréis, porque su importador en 
España, hace meses que lo presentó en 
los mejores salones. La noticia es que 
está a punto de aparecer la versión do- 
méstica MSX. Out Run simula un puesto 
de conducción de automóvil, en el que se 
pasa de un simple paseo a orillas de la 
playa, hasta una loca carrera por las 
grandes «higways» norteamericanas, pa- 
sando por tramos de lo más insólito. Un 
juego muy real, en el que factores como 
la aerodinámica de nuestro vehículo o la 
propia gravedad, supeditan los resulta- 
dos obtenidos. 



Una gran máquina 

SUPER HANG-ON 

Si también sois adictos a los video- 
juegos de salón, atención al espec- 
tacular producto que traemos a 
nuestra páginas: Super Hang-On! Toda 
la emoción de los grandes premios mo- 
tociclísticos del Continental Circus, a tra- 
vés de dieciocho variaciones de los gran- 
des premios de todo el mundo. El 
jugador se sienta sobre una magnífica 
imitación de prototipo motociclístico de 
gran premio, con su manillar, colín y 
depósito de gasolina. Al tomar una cur- 
va, la moto se inclina, al «enroscar» el 
gas, acelera, empuñando la palanca de 
freno trasero, reduce la velocidad... más 
veraz, imposible. Además, posee cuatro 
pistas distintas de audio y varios niveles 
de juego. El software ha sido diseñado 
por la prestigiosa emprea Electric 
Dreams Software y fuentes próximas a 
esta redacción, nos han asegurado que, 
en breve, será presentado en España 
tanto la máquina para salón de videojue- 
gos, como la versión para el estándar 
MSX. Si no tienes casco, pídelo a un 
amigo, porque pronto, lo vas a nece- 
sitar. 




OTRO JOYSTICK 
QUE TRIUNFA 

Distribuido en España por Serma, 
el veterano joystick Speedking 
lleva vendidas más de cien mil 



unidades en Europa en sólo medio- año. 
De tecnología suiza y diseño comodísi- 
mo al tacto sin duda este producto de 
Konix acabará convirtiéndose en un clá- 
sico e imprescindible dentro de la gama 
que la norma MSX ofrece. Si quieres 
hacerte con él (aunque imaginamos que 
ya lo tienes), puedes dirigirte a Serma: 
C/. Cardenal Belluga, 21. 28028 - Ma- 
drid. Tlf. 256 21 01. Por cierto, que a los 
que no lo sepan, decirles que existe en 
el mercado una versión mejorada del 
genuino Speedking. Las mejoras consis- 
ten en la incorporación de un interrup- 
tor de autodisparo on/off. Es el único en 
el mercado que funciona con todos los 
ordenadores domésticos y tan sólo cuesta 
3.660 Ptas., en las mejores tiendas espe- 
cializadas. 




SCRAMBLE, DE 
KONAMI 
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Sólo unas líneas para recordar un 
magnífico videojuego titulado 
SCRAMBLE, de la firma nipona 
Konami, distribuido en España por Ser- 
ma. Presentado en formato MEGA 
ROM, el nuevo soft de la empresa japo- 
nesa recuerda en su desarrollo a aquel 
excelente programa de Sony titulado 
Laydock, aunque la resolución gráfica del 
que hoy presentamos es ligeramente su- 
perior. Acramble se mantiene fiel a la 
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línea de calidad que Konamí ofrece en 
sus producciones: alto nivel adictivo, 
imagen y sonido efectivamente conjuga- 
dos... no lo olvidéis, Scramble, en Mega 
Rom, diversión asegurada. 



MESAS PARA 
ORDENADOR 
MICROGAYMA 



Seguramente muchos de vosotros 
tenéis dificultades con la ubicación 
del MSX en vuestro fugar de ope- 
raciones. La pantalla, unidad central im- 
presora y todo el montón de periféricos 
que podáis poseer, os ocupan un espacio 
exageradamente grande. Si realmente os 
acucian los problemas de espacio o sim- 
plemente optáis por instalar vuestro 
equipo de la forma más cómoda y racio- 
nal, de seguro que puede interesaros la 
propuesta de Microgayma. Esta empresa 
española, se dedica al diseño y fabrica- 
ción de mesas especiales para micros. 
Con un solo cable y en una sola mesa que 
ocupa el mínimo espacio, caben todos los 
elementos del microordenador o del ter- 
minal. Fuerte y funcional, de concepción 
ergonómica, todas las variaciones de Mi- 
crogayma han sido creadas por un am- 
plio equipo de especialistas, para conse- 
guir que se disponga de todo el conjunto 
del micro en un único puesto de trabajo 
de forma más cómoda para sacarle todo 
el partido. Microgayma comercializa va- 
rias versiones de su formidable mesa, 
una para cada necesidad individual. Más 
información dirigiéndose a Instalaciones 
Gayma, S.A. C/ Cartagena, 70 - 28028, 
Madrid. Tlf. 255 32 09- 
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Los otros 
lenguajes 



uando se habla de informática, 
tarde o temprano, sale a relucir 
nuestro queridísimo lenguaje 
BASIC, bien para alabarlo o bien para 
«despotricar» en su contra. 

El BASIC es un excelente lenguaje de 
programación que cumple con un come- 
tido esencial. Evidentemente no es el 
mejor lenguaje; pero ¿cuál lo es? 

Daremos en este rincón un repaso 
muy superficial a las ventajas y princi- 
pales características de los diferentes 
lenguajes que pueden encontrarse en un 
ordenador como el MSX, o como el 
IBM PC. 

El BASIC, pese a sus muchos detrac- 
tores, es el lenguaje ideal para iniciarse 
en la informática. Es un lenguaje senci- 
llo, directo, y que ofrece resultados de 
una forma rápida y visual. Cualquiera 
puede aprender a programar en BASIC 
gracias a su similitud con el lenguaje 
inglés. 

Sin embargo, existe otro lenguaje di- 
señado para el aprendizaje de la infor- 
mática. Nos referimos al PASCAL. Este 
lenguaje, con su férrea sintáxis y su en- 
corsetada estructura, obliga a los progra- 
madores a seguir unas reglas de estruc- 
turación lógicas y consistentes. De esta 
forma es muy fácil aprender a realizar 
buenos programas. El lenguaje PASCAL 
es el más extendido a nivel universitario 
en la mayoría de países del mundo. 

Muy conocido resulta también el FOR- 
TRAN, lenguaje desarrollado para la re- 
solución de problemas matemáticos 
complejos. Se puede decir que el FOR- 
TRAN ha sido ampliamente superado 
por otros lenguajes que, siendo más ge- 
nerales, permiten hacer uso de las fun- 
ciones del FORTRAN, como pueden ser 
últimas versiones de PASCAL o BASIC. 
Tiene un gran interés, sin embargo, por 
la cantidad de programas desarrollados 
en este lenguaje, punto que lo hace in- 
sustituible en entornos matemáticos. 

Hasta ahora hemos visto lenguajes de 
alto nivel. Demos un salto y acerquémo- 
nos más a nuestra máquina. El lenguaje 
ensamblador promete ser, dentro de 



poco, un monstruo antidiluviano que 
formará parte de la historia de la infor- 
mática. Sus excelentes prestaciones de 
velocidad y optimización de memoria lo 
hacen, sin embargo, hoy por hoy insus- 
tituible. Sin embargo, se prevee que los 
rápidos avances que se están realizando 
en el campo de lenguajes y compiladores 
permita que los lenguajes de alto nivel 
lleguen a ejecutarse a velocidades simi- 
lares a las del ensamblador. 

Como ejemplo de esto, hemos de 
nombrar al lenguaje C. El C es el len- 
guaje que está revolucionando la infor- 
mática personal de nuestros días. La in- 
mensa mayoría de los programadores de 
ordenadores personales se están pasan- 
do, poco a poco, a este sensacional len- 
guaje que combina la facilidad del BASIC 
o el PASCAL con la velocidad del len- 
guaje ensamblador. Todo un logro. 

Pero hay muchos otros lenguajes in- 
teresantes. En los MSX hay que destacar, 
por su gran aceptación, el lenguaje 
LOGO, una derivación del LISP, espe- 
cialmente diseñada para facilitar el 
aprendizaje de conceptos abstractos a los 
más pequeños de la familia. Este lengua- 
je está teniendo una importante implan- 
tación en aulas informáticas de centros 
docentes, en las que se pretende fomen- 
tar la actividad de los niños y niñas más 
pequeños con el ordenador. 

Y esto no es todo. Podemos nombrar 
lenguajes como ADA, el superlenguaje 
que, hasta ahora, sólo pueden ejecutat 
grandes sistemas (como el VAX 8600), 
y también podemos hablar de lenguajes 
como LISP y PROLOG (encaminados a 
la inteligencia artificial), B, RPG II y 
RPG III, etc. Aunque hemos de decir que 
estos lenguajes no se encuentran en los 
ordenadores del estándar. Sin embargo, 
como podéis comprobar por la enume- 
ración que acabamos de hacer, tenéis 
lenguajes donde elegir... 



Willy Miragall 
Redactor Jefe MSX-CLUB 
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Línea directa 




VARIOS 
PROGRAMAS 
POR CINTA 

Si grabo en una cinta dos 
programas distintos seguidos, 
¿cómo puedo hacer que el or- 
denador pase por alto el prime- 
ro y cargue sólo el segundo? 

Juan Vicente Díaz 
Navarro (CARTAGENA) 

La consulta que nos propo- 
nes tiene muy fácil solución, ya 
que es algo que el ordenador 
hace por si solo. Al grabar un 
programa con, por ejemplo, la 
instrucción CSABE debes indi- 
car un nombre entre comillas. 
Si grabas un segundos progra- 
ma a continuación del primero, 
lo harás con diferente nombre, 
ya que se trata de programas 
distintos. 

Para cargar el segundo de 
ellos directamente, basta con 
que indiques el nombre del 
programa a la hora de cargarlo. 
Por ejemplo: 

CLOAD »seg» 

pasará de largo todos los 
programas que no se llamen 
«seg» y sólo cargará aquél que 
tenga este nombre. 

MSX-CLUB EN 
CUENCA 



Querría preguntarles cómo 
se podría arreglar lo que pasa 
en mi localidad, ya que aquí no 
llegan sus revistas, por lo que 
tengo que comprarlas cuando 
me desplazo a Madrid. Me gus- 
taría que, si fuera posible, asig- 



naran unos cuantos números 
de su revista a mi localidad, 
Cuenca, pues su revista me re- 
sulta muy interesante y pierdo 
la oportunidad de adquirir los 
ejemplares. 
Antonio Malagón Camacho 
(CUENCA) 

Esperamos que este número 
sí llegue a tu poder. Hemos de 
decirte que en nuestro esquema 
de distribución hay asignada 
una cantidad de revistas a tu 
ciudad; pequeña, pero suficien- 
te, para que puedas acceder a 
ella. Lamentablemente, ciertos 
problemas de distribución en 
Cuenca, han hecho que se apre- 
cie, de forma más palpable, la 
escasez de nuestras revistas en 
esta ciudad. 

Si deseas evitarte todos estos 
problemas te recomendamos te 
suscribas a nuestra revista. De 
este modo, recibirás por correo 
cada uno de los números dé la 
revista, en cualquier punto de 
España o del extranjero. 

MUSICA MSX 

Soy usuario de un ordenador 
PHILIPS 8235. Hace un año 
compré el cartucho musical 
Music Module, y aunque sus 
cualidades de sonidos son mag- 
níficas, no se acopla a mis ne- 
cesidades, ya que tiene una se- 
rie de limitaciones que no me 
permiten tocar las canciones 
que yo deseo, así como tocar 
melodías sin ritmos. 

Quisiera que me informasen 
sobre otros cartuchos musica- 
les, así como sus características 




y precios. 

Eladio Gallego Gómez 
Jérica (CASTELLON) 

Dentro del enorme abanico 
de programas existentes para 
los MSX existen varios dedica- 
dos a la composición musical. 
En cambio, tú nos hablas del 
Music Module, que es un mó- 
dulo independiente que incor- 
pora su propio chip de sonido. 
Gracias a esto consigues con él 
un enorme abanico de sonidos 
y ritmos. 

Otros programas MSX te 
permiten una mayor libertad 
(programación de los ritmos, 
definir partituras de 3 voces, 
etc), pero no disponen del sin- 
tetizador del Music Module 
para reproducciones de alta ca- 
lidad. 

Debes, por tanto, elegir en- 
tre disponer de la calidad de 
sonido del Music Module, y la 
gran flexibilidad que te dan 
programas de una alta calidad 
como pueda ser Music Editor 
de UAL. 



PLAYS BELICOSOS 

He intentado hacer el pro- 
grama Lotería Primitiva por J. 
Carlos Orós, de su revista n. Q 
20 y hay un error en la línea 
710. Por mucho que lo he in- 
tentado, no doy con la solución. 
¿Qué podría hacer para que el 
resultado saliese por la impre- 
sora? 

Antonio Mestre 
Sant Boi de Llobregat 
(BARCELONA) 

La solución a tu problema es 
muy sencilla. Simplemente has 
confundido la «L» por una «/». 
La línea, por tanto, debe ser: 

710FORL=1 TOX.PLAY 
«V15L64o7A»:COLOR 

1 El error que has cometido 
es muy frecuente, ya que es 
muy fácil confundir una «/» mi- 
núscula con una «/» mayúscula 
o, a veces, con el número «I». 
Esperamos que respondiendo a 
tu carta, no sólo solucionemos 
tu problema, sino los de otros 
lectores que se encuentren en 
tu mismo caso. 



CASSETTE A 
CARTUCHO 



¿Se puede pasar un progra- 
ma grabado en cassette a car- 
rucho? ¿Cómo habría que ha- 
cerlo? 

José Javier Herrero 
ZARAGOZA 

Hemos de decirte que es per- 
fectamente posible grabar pro- 
gramas, tanto en BASIC como 
en código máquina, sobre car- 
tuchos de memoria ROM. He- 
mos de precisar que no se trata 
realmente de cartuchos ROM, 
sino de PROM ( Programmable 
ROM) o EPROM (Erasable 
Programmable ROM). 

Para ello debes disponer de 
un aparato especial que permi- 
te la grabación de estos chips. 
Igual que un grabador/ repro- 
ductor de cassettes te permite 
almacenarlo en la memoria 
EPROM. 

Hay que decir que esta gra- 
bación no es nada fácil, ya que 
el BASIC no incorpora ningún 
tipo de mandato para realizar 
esta grabación. Habrá que re- 
alizar, en la mayoría de los ca- 
sos, un programa en ensambla- 
dor para poder transferir 
nuestros programas al chip de 
EPROM. 

Una vez tenemos el progra- 
ma en el chip, hemos de mon- 
tarlo sobre un circuito impreso. 
Ahora podemos ya insertar el 
circuito en la carcasa del cartu- 
cho y ponerlo en funciona- 
miento. 

El procese, aunque complica- 
do, es perfectamente factible 
con una pequeña inversión (un 
grabador de EPROMs cuesta 
de 20.000 a 100.000 Pías.) y 
algún conocimiento de electró- 
nica. 

Otro inconveniente que se 
suma a este sistema es el ele- 
vado precio de los chips de me- 
moria EPROM. Por ejemplo, 
un modelo 27128 (de 16 Kb de 
capacidad) puede costar alrede- 
dor dé 1.000 Pías., y un 27256 
(32 Kb) unas 1.500. 

Esperamos haber saciado tu 
curiosidad acerca de la forma 
en que se graba un cartucho 
ROM. 
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UNA MESA DE 
ORDENADOR. 
¿PARA QUE? 



Muchos de nosotros tenemos un 
ordenador en casa, o si no lo 
tenemos nos gustaría tenerlo. 
Algunos lo tenemos en el armario o el 
altillo, otros lo guardamos debajo de la 
cama, de una mesa o simplemente den- 
tro de un cajón y los que lo utilizamos 
mucho, lo tenemos encima de la mesa, 
ocupándonos todo el espacio. 

El espacio en una casa es actualmente 
muy importante y un ordenador, por 
mucho que se utilice, no puede sacrificar 
el espacio dedicado al trabajo o al estudio 
de nuestros hijos. Para solucionar este 
problema os presentamos una nueva 
mesa para ordenador que, a la vez, puede 
utilizarse como mesa de trabajo. 

Realmente, lo que más espacio nos 
ocupa es el monitor o en su defecto, el 
televisor en blanco y negro que teníamos 
arrinconado en el armario. Nosotros he- 
mos encontrado una solución para esta 
gran pantalla. La hemos empotrado de- 
bajo de la mesa y con una inclinación 
adecuada y unos soportes estudiados, po- 
demos ver la pantalla del monitor a 
través de un hueco efectuado en la su- 
perficie de la mesa de trabajo. Este hueco 
está cubierto por un cristal ahumado de 
6 mm de grosor, que nos protege de la 
radiación de la pantalla al mismo tiempo 
que nos permite dejar papeles sobre la 
mesa. 

Por debajo de la superficie, a unos 15 
cm, existe una bandeja rectractil donde 
reposa el ordenador, conectado al moni- 
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He aquí dos vistas de esta práctica mesa para ordenador, que 
del equipo en un pequeño espacio. 
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tor por la parte posterior de forma que 
no quedan cables visibles a excepción de 
la toma de conexión a red que sale por 
debajo del monitor. 

Esta distribución nos permite trabajar 
sobre la mesa con nuestros papeles, cin- 
tas o diskettes sin necesidad de apartar 
el teclado o el monitor. Una vez termi- 
nado el trabajo, empujamos la bandeja 
hacia adentro y el ordenador queda es- 
condido debajo de la mesa, en el hueco 



que deja la inclinación del monitor. 

La mesa ya está lisa para que podamos 
trabajar en ella, estudiar o cualquier cosa 
que se nos ocurra. El ordenador queda 
asimismo protegido contra golpes y su- 
ciedad, sin la necesidad de tener que 
guardarlo en el armario. 

En fin, creo que una imagen vale más 
que mil palabras. 

Ahí está. 



CONTROL TIME 



Nombre y apellidos: 

Dirección: 

Población: 

CP.: 

Prov.: 

Tel.: 



Sí, deseo recibir una práctica mesa para ordenador al precio de 14.900 Ptas. IVA incluido a portes debidos. Para ello, adjunto 
talón bancario a nombre de Control Time, S. A., o giro postal a: 



CONTROL TIME 
Alava, 61, 5. Q , 1.» 
08005 - BARCELONA 
o llamar a (93) 300 30 00 
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Esta sección de MSX CLUB es de nuestros lectores. Todos ellos tienen derecho a tres inserciones totalmente gratuitas. Las características 
de esta sección no permiten la inclusión de anuncios con fines de lucro 



Vendo ordenador SV1-728 MSX y 
monitor en color CZEND por sólo 
S5.000 pías. Todo en perfecto estado. 
Una ocasión única para entrar en el 
mundo del MSX. Jorge Miragall 
Grau. Avda Uno 4, 2 o V, Sta Per- 
petua de Mogoda (BARCELONA i. 
Tlf.; (93) 560 53 49 a partir de las 
21 00 horas. CP.l. 

Cambio procesador de textos (Phi- 
lips) + ensamblador ZEN (Philips) 
+ compilador de PASCAL (Philips), 
todos juntos por ensamblador 
MONS de Sony. Interesados escribir 
a: Feo. Javier Mateos Muñoz C/ Pa 
saje del Valles 12, 4° R 08330 BAR 
CELONA. CP.l. 

Vendo por compra de MSX-2 con 
dos unidades de disco, unidad de dis- 
co Sony HBD-50, en perfecto estado 
y con un gran número de programas 
de juegos y de gestión en discos, todo 
por 35.000 ptas. También cambio 1 1 
juegos, Wordstar. dBase U, Home 
Office y el compilador Nevada CO- 
BOL por un compilador de BASIC, o 
de C. Angel Rodríguez Prada. Tlf. 
(98) 22 89 57. ORENSE. CP.l. 
Vendo ordenador sony HB-I01P en 
perfecto estado. Regalo manuales, 
cables, embalaje original, 65 |uegos 
entre ellos: Hero, Beamrider, Golf, 
River-Raid..., y varias revistas, todo 
por 25.000 ptas. Interesados ponerse 
en contacto con Carlos Andrés Garri- 
do Gil. Avda. Manuel de Falla 17. 5- 
c de San Fernando (CADIZ). Tlf.: 
(956) 89 11 79 de 8 a 9 de la tarde. 
CP.l. 

Compro ampliación de memoria de 
64Kb HBM064 u otra marca. Chris- 
tian Ortega Padró. Avda. Anselmo 
Clavé 26, 40 2\ Cornellá | BARCE- 
LONA). Tlf.: (93) 377 03 14. CP.l. 
Vendo ordenador musical Yamaha 
CX5M por 49.900 ptas. José. Tlf.: 
(945) 25 66 50. CP.l. 
Vendo 007 Alta Tensión, Camelot 
Warriors y Pentagram a 800 ptas, 
c/u (sistema MSX) o los cambio por 
Phantis. Phantomas II o El Cid. Son 
originales. Facilito mapas y cargado- 
res. Noel Martínez Vidal. C/'Men- 
dizábal 29. rí° 6. 4601 1 VALENCIA. 
CP 1. 

Compro revistas MSX atrasadas y 
libros sobre MSX (programación 
CM, descripciones del sistema, etc). 
Manuel Piñar Ruiz. C/ Real de Car- 
tuja 50. 18012 GRANADA. CP.l. 
Vendo ordenador MSX Philips 
8020, monitor Ambar 80, impresora 
matricial Philips 0030 (96 tipos de 
letra diferentes), unidad de discos 
simple cara, doble densidad, 010 de 
Philips. Se puede vender junto o se- 
parado. Regalo juegos. Buenos pre- 
cios. Envío en 24 horas. Juan Nievas 
Pérez. C/ Lepanto 24, 3 B. 43202 
Reus (TARRAGONA). Tlf.: (977) 
32 33 67 (noches). CP.l. 
Vendo impresora plotter Sony en 
perfecto estado de uso y a precio 
regalado. Regalo plumines y si se 
quiere también programas. Escribir a 
Eustasio Viviente Acosta. C/ Jara Ca- 
rrillo 28. 30740 San Pedro del Pina- 



tar (MURCIA). Tlf.: (968) 18 20 06. 
CP.l. 

Contacto con usuarios de MSX en 
Móstoles para cambiar programas, 
trucos e información en general del 
MSX. También para formar un club 
MSX en Móstoles. Antonio Jesús 
García Serrano. C/ Arévalo 2, 2 B. 
28930 Móstoles (MADRID). Tlf.: 
618 56 30. CP.l. 

Vendo/cambio juegos. Poseo entre 
otros Gauntlet, Army Moves, Arquí- 
medes XXI, Star Soldier, Knight 
Mare, Phantis. Oscar J. Urdangaray 
Beade. Tlf.: (981) 28 52 81. CP.l. 
Vendo ordenador Philips VG-8020 
de 80Kb, con garantía, cables, ma- 
nuales y embalaje original. Regalo 
más de 30 cintas con juegos comer- 
ciales y utilidades, todas con carátula, 
también intercambio programas en 
disco 3'5". Enviar lista a Fernando 
Gómez. C/ Montsant 32, 3 o 1». BAR- 
CELONA 08031. Tlf.: (93) 357 88 
22. CP.l. 

Vendo SVI-738 con unidad de disco 
3"5" incorporada. 3 sistemas opera- 
tivos (CP/M, MSX-DOS y Disk- 
Basic). Conexión RS-232, 80 colum- 
nas, salidas vídeo compuesto y tele- 
visor. Reset incorporado. Maletín de 
transporte y 5 manuales. Compatible 
ficheros IBM. Regalo dBase, Worstar 
y un montón de juegos y utilidades 
de todo tipo. Precio a convenir. Ja- 
vier? horas de comida y noches. Tlf.: 
401 91 85 (MADRID). CP.l. 
Vendo ordenador Toshiba HX-10 
64Kb, en buenas condiciones. Ade- 
más de regalar 50 juegos, revistas de 
MSX, cargador de cintas y una estu- 
penda cámara de hacer fotos. Todo 
ello por sólo 24.000 ptas. C/ Molino 
48-50. BARCELONA 08016. Tlf.: 
350 65 20. Preguntar por Pedro 
Ruiz. CP.l. 

Vendo ordenador Philips 8250 
MSX-2 64 ROM, 3 semanas de an- 
tigüedad (en garantía). Regalo 10 
discos llenos de programas. Lo vendo 
por compra de otro más grande. 
PVP: 80.000 ptas. Llamar de 10.30 
a 12 noche. Tlf.: 240 24 86. BARCE- 
LONA. Preguntar por Rafael. 
CP.l. 

Compro programas de dibujo, en- 
sambladores y editores musicales en 
disco de 3"5" (MSX 1 y 2). También 
compraría ratón. Jaime. Tlf.: (91) 
479 76 26. CP.l. 

Cambio Track & Field II (cartucho), 
Chiller (cinta) y Panic Junction (cin- 
ta) por el juego Némesis (cartucho). 
Preguntar por Enrique. Tlf.: (91) 
232 41 01. MADRID. Llamar a par- 
tir de las 15.30 y los fines de semana 
por la mañana. CP.l. 
Vendo ordenador SVI-738 X'Press 
con manuales en castellano, conexio- 
nes, maletín de transporte y su em- 
balaje. A estrenar. Tlf.: (976) 56 59 
35. Santiago Oliver. ZARAGOZA. 
Llamar horas comidas. CP.l. 
Vendo Mitsubishi ML-G3 (MSX-2 
con unidad de disco incorporada) + 
Music Module (Philips) + 20 discos 
(llenos de los mejores programas)... 



todo intacto por 50.000 ptas. Jordi 
Maya Meseguer. C/ San José 14. 
08370 Calella (BARCELONA) Tlf.: 
(93) 769 06 40. CP.l. 
Intercambio lenguajes y programas 
para SV1-328 en CP/M-80. Tengo 
Cobol-80, Fortran-80, Forth, Turbo 
Pascal, Profile, dBase II, Word Star 
y MBasic. Koldo Navarro Pardo. C/ 
Juan Gardeazabal 1, I o A, Esc. C. 
BILBAO 48004. BISKAIA. CP.l. 
Vendo ordenador toshiba HX-10 de 
64Kb, con garantía 6 meses. Nuevo, 
con manuales, instrucciones e intro- 
ducción al BASIC. 3 cartuchos kona- 
mi, cassette ordenador, joystick San- 
yo y joystick Aristón. Todo junto o 
por separado. ¡Precio regalado por 
comprarlo todo junto! Miguel Garri- 
do Pareja, Bib-rambla 22 1°. Tlf.: 22 
28 52 GRANADA. CP.l. 
Vendó consola de video-juegos Atari 
en perfecto estado. Incluyo 2 joys- 
ticks, 2 paddles, 8 juegos ROM (va- 
lorado en 40.000). Precio 15.000 ptas 
negociables. Carlos. Tlf.: (93) 354 75 
88 a partir de las 21 h. CP.l. 
Compro programa para msx-1 
(Spectravideo SV1-728) para control 
de almacén-entradas, salidas, stocks, 
listado, etc., en disco de 5 1/4". José 
Miguel Rodríguez. C/ Río Ser 4, 3 B. 
17003 GIRONA. CP.l. 
Intercambio programas originales 
para MSX. Poseo últimas novedades 
de ERBE, DINAMIC y KONAM1. 
Interesados escribir a Joaquín Minte- 
ro Amat. C/ Constitución 31, 3 o 
Drcha. 03360 Callosa de Segura 
(ALICANTE) .CP.l. 
Vendo ordenador MSX-2 de Mitsu- 
bishi por 52.000 ptas. Jaime Buxeda. 
Tlf.: (93) 710 97 82. Sabadell (BAR- 
CELONA). Llamar tardes. CP.l. 
Cambio/vendo programas MSX 
originales. Poseo Gauntlet, army 
Moves 1,2 etc. Juan García Lizán. C/ 
Fulgencio Miñano 7. Molina de Se- 
gura. (MURCIA). CP.l. 
Compro/cambio Knightmare. Lo 
compro por 3 000 ptas. o bien lo 
cambio por atlethic Land, Antartic 
Adventure, Monkey Academy, Soc- 
cer, Track & Field I, Kung-Fu I y 
Mouser. Francisco Javier Orellano 
Liza. C/ Mariano Vergara 7, 5 Atico. 
30003 MURCIA. CP.l. 
Compro MSX 127kKb, con pantalla 
de filtro verde y unidad de disco o 
IBM con pantalla de filtro verde y 
unidad de disco. Antonio Jesús Nieto 
Morales. Tlf.: 24 21 25. ALMERIA. 
CP.l. 

Vendo Spectravideo 738 X'Press 
completamente nuevo (500 Kb). 
Urge su venta. Tlf.: (976) 56 59 35. 
ZARAGOZA. Preguntar por Santia- 
go. CP.l. 

Contacto con aficionados que posean 
MSX (Toshiba HX-10) y que tenga 
conocimientos de electrónica para in- 
tercambiar ideas de fabricación de 
cartuchos para controlar aparato te- 
ledirigido por ordenador. Escribir a 
Imeldo de Castro García. C/ Cuesta 
de la Villa 117. 38390 Sta. Ursula 
(Sta. Cruz de Tenerife). CP.l. 



Vendo ordenador Spectravideo SVI- 
318 con cassette SV-904, manuales, 
2 juegos y joystick Quickshot II por 
19.000 ptas. José Félix Vicente. Tlf.: 
(94) 437 25 94 CP.l. 
Vendo cartucho ROM MSX (Hyper 
Sport I, Kung Fu I, Némesis, Atlectic 
Land), impresora plotter Sony 
PRNC color, poltter printer y unidad 
de discos Philips VY-0010 con 50 
programas originales en disco de re- 
galo. Sascha Ylla. Tlf.: 212 72 03. 
CP.2. 

Deseo contactar con personas inte- 
resadas en intercambiar juegos MSX. 
Enviar lista al apartado 41 de Llinas 
del Valles. Enviaré lista de juegos, 
más de 150. Absoluta seriedad. An- 
drés Bermejo. CP.2. 
Vendo ordenador Sony HB-20P, 
MSX. Poco uso, con garantía. Regalo 
libros, revistas, manuales, cartuchos 
y cintas de juegos. Sólo por 20.000 
ptas. Tel.: 332 28 25. VALENCIA. 
Llamar de 14 a 16 horas. CP.2. 
Vendo por cambio de sistema de 
juegos MSX. Primeras marcas: Za- 
nac, Green Beret, Némesis, Knight- 
mare, Goonies, Penguin Adventure, 
Spirits, Army Moves, etc. Los vendo 
muy baratos. Llamar a partir de las 
7 a José Angel Tlf.: (94 ) 461 61 88. 
CP.2. 

Vendo 30 magníficos juegos origina- 
les de la categoría de Arkanoid, Don- 
key Dong, Nonamed, Hopper, Panel 
Panic, etc, por sólo 6.900 ptas. ¡Gran 
oferta! ¡Aprovéchala! Para más in- 
formación escribir a José Juan Prior, 
C/ Avda. Andalucía, 196. Dos Her- 
manas (SEVILLA) CP.2. 
Si te interesan programas de MSX- 
2 como Worsdtar, Dbase-II, Multi- 
plan, Perry Masón, Laydok, Vampire 
Killer, La isla del tesoro, Fahrenheit 
451, Dragón World, SP Rambo y 
todas las novedades del mercado 
ponte en contacto con Joaquín Tlf.: 
(93) 332 72 34. C/ Energía, bloque 
M. Esc 1*. 10° 2 a , 08004 BARCELO- 
NA. CP.2. 

Intercambio programas originales 
en cinta con otros usuarios del siste- 
ma MSX y vendo los siguientes car- 
tuchos a 2.500 ptas. cada uno: Antar- 
tic Adventure, Juno First, Space 
Mace, Attack, Track Field I, aseguro 
respuesta. Pere García Calveras. Co- 
lonia Marcal, 1 Q , 3-2 08692 Puig Reig 
(BARCELONA). Tlf.: 838 02 28. 
CP.2. 

Compro sofware de aplicaciones y 
gestión, en formato de cinta o cartu- 
cho, también estaría dispuesto a in- 
tercambiarlo. Jordi Salvadó. C Sane 
Tomás, 3, 43330 Riudoms (TARRA- 
GONA). CP.2. 

Vendo ordenador Mitsubishi MSX 
MLF-80, monitor en fósforo verde 
Philips BM-7502, Data Recorder 
Mitsubishi ML-lOdr. Además obse- 
quio con 2 joysticks Quick Shot II y 
Canon VY-200. Más de 10 cintas de 
juegos y utilidades, cartucho de 
juegos. Todo nuevo por tener en des- 
uso. Atención, también regalo al 
comprador sintetizador Roland mo- 
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nofónico con consola efectos, 2 octa- 
vas y media. Embalaje y todas cone- 
xiones, precio estupendo. Tlf.: (942) 
81 05 24 Manuel. No llamar de 18.00 
h. en adelante. CP.2. 
Compro o cambio por programas 
en disco, cinta o cartucho, por el 
programa Turbo 5000, también in- 
tercambio toda clase de programas, 
especialmente en disco de 3'5". Inte- 
resados escribir a: Agustí Obradors 
Muntadas. C/ Major, 68, 2 o I a , 085 1 3 
Prats de Llucanes. (BARCELONA) 
Tlf.: 856 03 74 CP.2. 
Compro impresora plotter o matri- 
cial en buen estado. Interesados lla- 
mar de 12 a 2.30 mañana y de 10.30 
a 12 noche. Tlf.: (93) 815 17 39. 
Vilanova y la Geltrú (BARCELO- 
NA). Preguntar por Christian 
CP.2. 

Compro libro usado de Código Má- 
quina para MSX de Data Becker. 
Antonio David Delgado Frías C/ 
Santiago Cuadrado, 31,2» drcha . San- 
ta Cruz de Tenerife. Aseguro res 
puesta, precio a convenir. CP.2. 
Vendo los siguientes juegos origina 
les: Comic Barkery, Yie Ar, Kung- 
Fu, Alien 8, Nightshade y Cameloi 
Warriors. Todos juntos por 5.000 
ptas. Celso Castro. Plzu. de Ferrol, 6- 
10, 27001 Lugo. Tlf.: (982) 24 11 64. 
CP.2. 

Desearía contactar con otros usuarios 
de MSX para intercambia de progra- 
mas, ideas y trucos sin fines econó- 
micos. Antonio Alcántara Arevalo 
C/ Joaquín Sorolla, 28, 11006 SEVI- 
LLA CP.2. 

Contacto para formar un dub de 
MSX Para todos los usuarios de ( A 
DIZ. Si te quieres jpunur, llama al 
tlf.: 25 27 7l o escribe- a Pl/a. de la 
Almudaina, 4, 7" B, 11006 CADIZ 
CP.2. 

Vendo Sony F-500 MSX-2. Si tienes 
Ufl F-500 y no logras sacarle partido 
escríbeme. M. E Martínez CJ Alfon- 
so I, 28, 6» B, 30003 ZARAGOZA 
Tlf.: (976) 22 24 70. CP.2. 
Vendo ordenador musical Yamaha 
CX5M1I por 49.900ptas. Tlf.: (945) 
25 66 50. José. CP.2. 
Vendo ordenador Toshiba HX-10 
MSX de 80 Kb, unidad de disto Sony 
HBD-50, interface de conexión, ca- 
bles, manuales, garantía y juegos por 
sólo 75.000 ptas. Perfecto estado. 
Para más información escribir a: 
Juan C. Enrique C/ La Carrera 2, 5 U , 
12530 Burriana (CASTELLON). 
Sólo CASTELLON y provincia. 
CP.2. 

Vendo ordenador Spectravideo 328 
con adaptador a MSX y con su cas- 
sette SV-904, además de juegos ori- 
ginales, libros de programación, etc. 
Sólo 30.000 ptas. negociables (inclui- 
do IVA y garantía). Preguntar por 
Gaby o Jordi. Tlf.: (93) 389 52 34. C/ 
Conquista, 21, 08912 Badalona 
(BARCELONA). CP.2. 
Vendo Spectravideo SVI-328 super 
expander, unidad de disco cassette, 
80 columnas, 2 ampliaciones: 64Kb 
RAM y 16Kb RAM. Tableta gráfica, 
interface paralelo, CPM Worldstar, 
Multiplan, Dbase II, Cobol, Pascal, 
Fortran 80 etc. Todo por 100,000 
ptas. Javier Torres Tlf.: 204 43 15. 
CP.2. 

Cambio o compro programas para 
MSX. Me interesan Coaster Race, 
Chopper II, Fighting Ridder, Le 



Mans II, Traiblazer, 3D Walter, Dri- 
ver, etc. Tengo muchos. Escribir a 
Juan González C/ Rosalía de Castro, 
43, 1° D. Santiago (LA CORUÑA) 
envíame tu telefono y te llamaré. 
CP.2. 

Toshiba HX-10E 64Kb, cables cas- 
sette y antena, 2 manuales, 10 pro- 
gramas cassette, 2 manuales Road 
Fighter, Nemesis, 5 libros (Basic, C." 
M., programas). Más de 20 revistas 
MSX. Todo por 40.000 ptas. Sebas- 
tian Pons Borrás C/ Virgen de Mon- 
te Tóro, 22. 07740 Mercadell (ME- 
NORCA) BALEARES. Tlf.: (971) 37 
50 35 CP.2. 

Intercambio o compro cassettes o 
cartuchos para MSX. Vendo Spec- 
trum Plus por 20.000 pías, discuti- 
bles. Eusebio Cárdenas C/ Cruz del 
Río 100, 06700 Villanueva de la Se- 
rena (BADAJOZ). CP.2. 
Vendo super Expander con dos uni- 
dades de disco, ampliación de memo- 
ria a 64Kb 80 columnas, interfaces 
RS232 y Centronics y Tableta gráfi- 
ca. Además de los manuales y disket- 
tes de Basic del disco y CP/M 2.23. 
Todo por 100.000 ptas Escribir a J. 
A. Pardo C Pompeu Fabra, 7, 2° 3 a , 
Granollers (BARCELONA) o dejar 
recado al vecino Tlf.: 398 63 98. 
CP.2. 

Vendo ordenador Sony HB-I01P 
con embalaje original, 32Kb, joys- 
tick, asa transporte, Data Bank, se- 
lector canales y cables. Incluye ma- 
nuales (instrucciones Data Bank, 
programación MSX Basic, introdui 
ción al Basic, etc.) por W.000 pus 
Nuria Genebriera Tlf. (93) 241 21 ""7 
de 3 a 5 de la tarde. CP.2. 
Vendo o cambio programa* de 
MSX-2, poseo Vampire Killer, 
Hydlide, World, Golf, Daiva, Fah 
renheit 451, Perry Masón, etc. Juan 
Antonio López. C/ Riera Blanca, 
158, 4° 2-, 08903 L Hospitalet de 
llobregat (BARCELONA). Tlf.. 
431 15 63. CP.2. 

Vendo todos mis programas MSX 
por cambio de sistema: Konami, Di- 
namic, Topo, etc ., Army Moves. 
Goonies, Livingstone, Phantomas 1. 
Arkanoid, Knight Mare, Samaniha 
Foxx, etc.. hasta 200 títulos. Precios 
increíbles. Escribid rápido y enviaré 
información. Joaquín García. C/ Fi- 
valler 24, Bajos 2\ 18840 Viladecans 
(BARCELONA). CP.2. 
Compro ordenador MSX-2, unidad 
de disco, impresora y monitor TV en 
color, en buen estado de uso. Contes- 
taré a todas las cartas, respuestas a: 
Juan Manuel Elices Sandoval. C La- 
rragain 6, 3 o Drcha. 20500 Mondra- 
gon (GUIPUZCOA). Tlf.: (943) 79 
80 69 a partir de las 20 horas. CP.2. 
Vendo o cambio por periféricos 
para ordenador MSX o por ordena- 
dor MSX-2 máquina reflex marca 
Cosina CT- 1 con Zoom macro y má- 
quina Zenith, también reflex con ob- 
jetivo de 50 mm. Responderé todas 
las cartas. Juan Manuel Elices Sando- 
val. C/ Larragain 6, 3 o Drcha. 20500 
Mondragon (GUIPUZCOA). Tlf.: 
(943) 79 80 69. después de las 20 
horas. CP.2. 

Vendo o cambio juegos, poseo las 
últimas novedades. Me interesa 
Gryzor y Jailbreak. No te lo pienses 
y ponte en contacto con: Antonio 
Fernandez López. C/ Concepción Bl, 
1° 70 C. Almuñecar (GRANADA). 
CP.2. 



UN LIBRO 
PENSADO PARA 
TODOS LOS 
QUE QUIEREN 
INICIARSE DE 
VERDAD 
EN LA 

PROGRAMA- 
CION BASIC 

Construcción de 
programas. El potente 
editor todo pantalla. 
Constantes numéricas. 
Series, tablas y 
cadenas. Grabación de 
programas. Gestión de 
archivo y grabación 
de datos. Tratamiento 
de errores. Los 
gráficos del MSX. 
Los sonidos del MSX. 
Las interrupciones. 
Introducción al 
lenguaje máquina. 



Y ADEMAS PROGRAMAS DE EJEMPLO 

Alfabético. Canon a tres voces. Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. La Flauta Mágica de Mozart. 
Scrapple from the apple & Donna Lee. The entretainer. Teclee un 
número. Calendario perpetuo. Modificación Tabla de colores 
SCREEN 1. Rectángulos en 3-D. Juego de caracteres alfabéticos en 
todos los modos. Juego Matemático. Más grande más pequeño. 
Poker. Breackout. Apocalypse Now. El robot saltarín. El archivo 
en casa. 




í~" 



Deseo me envíen el libro de los secretos del MSX, para lo 
cual adjunto talón de 1.500 ptas. a la orden de MAN- 
HATTAN TRANSFER, S.A. 

Nombre y apellidos 

Calle n.° 

Ciudad CP 

Este boletín me da derecho a recibir los secretos MSX en 
mi domicilio libre de gastos de envío o cualquier otro 
cargo. No se admite contrareembolso. 

Importante: Indicar en el sobre MANHATTAN 
TRANSFER, S.A. 

«LOS SECRETOS DEL MSX» 

Roca i Batlle, 10-12 Bajos - 08023 BARCELONA 
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El basic paso a paso 



Organización de 
programas (II) 



,Por Willy MiragaU, 



Tras la introducción que dimos en 
el pasado número a la estructuración 
de programas vamos a pasar a la prác- 
tica. ¿Cómo se programa un buen 
programa estructurado? ¿Que son las 
subrutinas, cómo se gestionan? 



LOS MODULOS EN 
LA PRACTICA 



En el pasado número comentába- 
mos que un buen programa debía 
dividirse en módulos. Cada uno de 
estos módulos ha de programarse como 
un programa independiente. De este 
modo en cada momento sólo tenemos en 
la cabeza una pequeña fracción del pro- 
grama, evitándonos de este modo que- 
braderos de cabeza. 

Pero es muy fácil decir que el progra- 
ma debe dividirse. A la hora de la verdad 
hay que teclear un programa, con un solo 
conjunto de variables, con una sola línea 
de ejecución, en definitiva, hay que hacer 
una unidad. 

Para facilitarnos la tarea de programar 
estructuradamente, el BASIC dispone 
unas estructuras especiales denominadas 
subrutinas o subprogramas. 

Cada subrutina se desarrolla como un 
programa independiente. Cuando este 
programa funciona correctamente y ha 
sido totalmente probado podemos, con 
unas sencillas modificaciones, añadirlo a 
nuestro programa (de gran tamaño) con 
suma facilidad. 

Pero en vez de hablar y teorizar mu- 
cho, como en nuestro último número, es 
mejor que pasemos a la práctica. Vamos 
a realizar una subrutina y vamos a con- 
tinuación a insertarla como parte de un 
programa mayor. 



SUBRUTINA 

Otra de las ventajas inherentes a las 
subrutinas es la facilidad con que pueden 
reducir el tamaño de nuestros progra- 
mas. Imaginemos un programa de con- 
tabilidad, o cualquier aplicación de este 
tipo. En este programa deben realizarse 




infinidad de menús, pantallas con lista- 
dos, entrada de datos, etc. Todas estas 
pantallas deberían aparecer recuadradas 
(por razones de estética simple- 
mente). 

Pensad en el enorme trabajo que re- 
presenta repetir para cada pantalla el 
dibujo de una cenefa en la pantalla. Si 
definimos una rubrutina para el dibujo 
de la cenefa nos bastará con ejecutarla 
cada vez que necesitemos una cenefa. 

Pero el ejemplo de la cenefa es dema- 
siado sencillo, así que realizaremos una 
subrutina que presente en pantalla un 
menú con un número variable de opcio- 
nes (entre 2 y 8). De este modo centra- 
lizamos de una forma clara todos los 



menús de nuestro programa. Si algún 
menú falla sabemos que el error está en 
la subrutina de menús, y no hemos de 
preocuparnos por el resto del pro- 



PREDICAR CON EL 
EJEMPLO 

Hace poco hemos dicho que una su- 
brutina debía realizarse como un progra- 
ma totalmente independiente y eso es lo 
que vamos a hacer. Tal vez alguno pensó 
que se trataba de una forma de hablar. 
No lo es. Vamos a realizar un programa 
que sólo hace menús. 
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Hacer un menú que siempre tenga las 
mismas opciones no nos es de ninguna 
utilidad, por lo que haremos un progra- 
ma que presente el menú según ciertas 
variables que definiremos al principio 
del programa. 

Veamos el listado t, 

En primer lugar las líneas 10 a 55 
colocan los valores adecuados en las va- 
riables. Estas variables son las que nos 
permitarán, cambiando su valor, realizar 
diferentes menús con una sola subru- 
tina. 

En primer lugar la variable N contie- 
ne el número de entradas del menú (en- 
tre 2 y 8). A continuación definimos la 
variable T$, que contiene el título del 
menú. Este título aparecerá en la parte 
superior de la pantalla. 

Las líneas 20 a 55 definen cada uno de 
los apartados del menú. Debe haber tan- 
tas definiciones como opciones tenga el 
menú. En la línea 60 empieza la acción. 
En primer lugar borramos la pantalla, 
colocamos el ancho de línea a 40 carac- 
teres y borramos las teclas de función de 
la pantalla. 

Las líneas 70, 75 y 80 se encargan de 
dibujar 3 líneas horizontales en las filas 
0, 4 y 22. La línea 85 realiza, de forma 
análoga, dos líneas verticales en las co- 
lumnas y 39. 

Las líneas 90 a 115 rematan el dibujo 
de la cenefa añadiendo los caracteres de 
las esquinas. 




Hemos de decir que esta no es la única 
ni la mejor forma de dibujar una cenefa 
en SCREEN 0; pero es lo suficientemen- 
te sencilla como para que todos puedan 
seguirla sin problemas. 

En la línea 120 empiezan las compli- 
caciones. El título debe estar centrado si 
queremos que el aspecto de nuestro 
menú sea aceptable. Para ello restamos 
de 40 (ancho total de la pantalla) el 
número de caracteres de T$ (len t$)) y 
dividimos el resultado por 2. De esta 
forma obtenemos la posición en la que 
imprimir el título del menú, cosa que 
hacemos inmediatamente en la misma 
Mnea. 



Algo más difícil resulta centrar los 
textos de las diferentes opciones. Aquí 
es el criterio de cada uno el que debe 
escoger entre una de las muchas posibi- 
lidades. Podemos centrar todas las op- 
ciones o, como hemos hecho en nuestro 
programa, centrar la mayor de todas y 
colocar las demás en columna. 

Para realizar esto último debemos en- 
contrar la longitud de la opción más 
larga. Eso es lo que hacen las líneas 125 
a 140. Recorren todas las opciones y 
almacenan en la variable M la longitud 
de la mayor de todas. 

La línea 145 es muy similar al prin- 
cipio de la 120. Aquí restamos dos ca- 



LISTADO I 
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15 

20 
25 
30 
35 
40 
45 
50 
55 
60 
65 
70 
75 
W" i 



N=7 

T*="MENUS-CLUB" 
O* ( 1 )="Primera" 
O* (2) ="Segunda" 
0*<3>="Tercera" 
Q*(4) «"Cuarta" 
0*<5>="'Quinta n 
0$í6)="Sexta" 
0*<7)="Séptima" 
G* (8) = "Ultima" 
GLS 

WIDTH 40:KEY ÜFF 
FGR 1=1 TO 40:PRINT "■ 
LOCATE 0,4: FGR 1=1 TO 
: NEXT I 



80 LOCATE 0,22: FOR 
I 

1 TO 21: LOCATE 



85 



FOR 



V" : LOCATE 39,I:PRINT 
90 LOCATE 0,0:PRINT 
:ATE 0,4:PRINT 



105 LOCATE 39,0:PRINT "V 
110 LOCATE 39,4:PRINT "-\" 
115 LOCATE 39,22:PRINT "-"' ; 
120 X=(40-LEN<T*> ) /2: LOCATE X,2:PRI 
NT T* 
125 M=0 

130 FOR 1=1 TO N 

135 IF LEN<Ü*<I))>M THEN M=LEN(0* 
(I) ) 

140 NEXT I 
145 P= (40-M) /2-2 
150 H=14-N 
155 FOR 1=1 TO N 

160 LOCATE P,H:PRINT CHR*(64+I);" 

";0*<I> 
165 H=H+2 
170 NEXT I 

175 LOCATE 5,22:PRINT "Opción (A-"; 
CHR* (64+N) ; " ) » 
0,I:PRINT " 180 LOCATE 18,22 
1 : NEXT I 185 A*=INPUT$<1> 

190 0P=ASC(A*)-64 

R 



-"; : NEXT I 
40:PRINT 



1=1 TO 40:PRINT 
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El basic paso a paso 



racteres a la posición de centrado, ya que 
añadiremos un carácter para representar 
cada opción. 

La línea 150, de modo análogo, calcula 
la posición vertical en que debe aparecer 
la primera opción para que el conjunto 
esté centrado verticalmente. 

Las líneas 155 a 170 se encargan de 
mostrar en pantalla las diferentes opcio- 
nes. Fijaos en la línea 160. En ella apa- 
rece algo tan extraño como, CHR 
$(64+1). La función chr$(x) devuelve el 
carácter cuyo código ASCII asociado es 
el 'x'. Sabiendo que el código de la «A» 
es el 65 y que las demás letras están 
ordenadas según códigos crecientes, ob- 
tenemos con 64+1 el código de la letra 



i-ésima del alfabeto. 

Visto esto la línea 175 no debería 
tener ninguna complicación. Finalmente 
las líneas 185 a 195 se encargan de 
obtener la opción escogida por el 
usuario. 

A$=input$(l) espera a que pulsemos 
una tecla. La función ASC es la comple- 
mentaria de CHR$(x). Es decir, dando 
un carácter nos da su código ASCII. En 
la línea 190 restamos 64 al código del 
carácter tecleado. Sólo nos queda com- 
probar en la línea 195 que el carácter es 
válido. 

Como veis se trata de un programa 
relativamente sencillo; pero que nos re- 
solverá para siempre el diseño de me- 
nús. Evidentemente cada uno puede 
complicarlo tanto como desee hasta con- 
seguir menús de diferentes formas, ta- 
maños, etc. 

DE PROGRAMA A 
SUBRUTINA 

Ahora viene el paso final, convertir 
este pequeño programa en una subruti- 
na. El primer paso es borrar la inicia- 
lización de variables del comienzo del 
programa (líneas 10 a 55). Es aconseja- 
ble apuntar las variables en un papel. * 

El segundo paso consiste en cambiar 
el END de la línea 200 por una instruc- 



ción RETURN de forma que, cuando 
termine de ejecutarse la subrutina, el 
control retorne al programa principal. 

El último paso, para una mayor como- 
didad a la hora de unir varias subrutinas 
en un progrma, es renumerar las líneas. 
Esto podemos conseguirlo fácilmente 
con la instrucción RENUM. Haciendo, 
por ejemplo, RENUM 30000, la subru- 
tina se ubicará a partir de esa línea. 
Podemos ahora realizar un programa 
que utilice la subrutina. 

COMO USAR LAS 
SUBRUTINAS 

Utilizar las subrutinas que acabamos 
de definir es un juego de niños. Para ello 
sólo hemos de asignar los valores que 
deseemos a las variables de control e 
indicarle al BASIC que llame a la subru- 
tina de la línea 30000, cosa que se con- 
sigue por medio de la instrucción 
GOSUB. 

Por hoy lo dejamos aquí; pero en el 
próximo número volveremos al ataque. 
Os daremos trucos para mejorar vues- 
tras rutinas, para impedir confundir las 
variables de vuestros programas con los 
de las subrutinas que utilicéis, y un largo 
etcétera que os ayudarán a utilizar cada 
vez mejor estas potentes herramientas 
que son las subrutinas. ¡Hasta en- 
tonces! 



SUSCRIBETE 

Suscribiéndote no sólo tienes la seguridad de tener todos los meses tu 
MSX CLUB DE PROGRAMAS en tu casa sino que recibirás 12 
números pagando sólo 10 



BOLETIN DE SUSCRIPCION MSX CLUB DE PROGRAMAS 




D. Postal 



Teléfono 



•*••••#•••*#•••*»•■•»*« 







Deseo suscribirme por doce números a la revista MSX CLUB DE PROGRAMAS a partir del número 

que pago adjuntando talón al portador barrado a: C/. Roca i Batlle, 10-12 - 08023 Barcelona 

Tarifas: España por correo normal Ptas. 2.750,— 
Europa por correo aéreo Ptas 3.50o|— 
América por correo aéreo USA$ 35USAI 
Importante: Colocar en el sobre: Departamento Suscripciones MSX CLUB. NO SE ADMITE CONTRAREEMBOLSO. 
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760 PkE 
770 IIK 



«t \ . (?«%a i nt t ' 




1,3,1 
TO 10: LINE Í95 



BASES 

1. Podrán participar todos nuestros 
lectores, cualquiera sea su edad. 

2. Los programas podrán ser envia- 
dos en cinta de cassette, debida- 
mente protegidos en su estuche de 
plástico, o en disco de 3 1/2 pulga- 
das. En este último caso se remitirá 
al participante un disco virgen en 
el momento de recibir el programa 
enviado. 

3. Todos los programas deberán lle- 
var la carátula adjunta, ó bien foto- 
copia de la misma. 

4. Cada lector puede enviar tantos 

Rrogramas como desee, 
fo se aceptarán programas ya pu- 
blicados en otros medios o plagia- 
dos. 

6. Los programas deben seguir las 
normas usuales de programación 
estructurada, utilizando líneas 
REM para marcar todas sus partes, 
subrutinas donde sean necesarias, 
etc. 

7. Todos los programas deben in- 
cluir las correspondientes instruc- 
ciones, lista de las variables utitili- 
zadas, aplicaciones posibles de 
programa y todos aquellos comen- 
tarios y anotaciones que el autor 
considere puedan ser de interés 
para su publicación. 

PREMIOS 

8. Los programas serán premiados 
mensualmente, de modo acorde 
con su calidad, con un premio en 
metálico de 2.000 a 15.000 ptas. 

FALLO Y JURADO 

9. El Departamento de Programa- 
ción de * 



CONCURSO DE PROGRAMAS 




club 



de PROGRAMAS 



hará la selección de aquellos pro- 
gramas de entre los recibidos se- 
gún su calidad y su estructuración. 
10. Los programas seleccionados apa- 
recerán publicados en la revista 
MSX-Club de Programas, en la 
que se publicará, junto con el pro- 
grama, la cantidad con que ha sido 



Remitir a: 



premiado. 

11. Las decisiones del jurado serán 
inapelables. 

12. Los programas no se devolverán 
salvo que así lo requiera el autor. 

13. El plazo de entrega de los progra- 
mas finaliza el 1 de septiembre 
1988. 





- MI PROGRAMA 



Roca i Batlle, 10-12, bajos 08023 Barcelona 
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Programa 



iPor Jordi Farando Gener 



AGENDA 
TELEFONICA 



¿Necesitas disponer de una bue- 
na agenda con capacidad para 
todos los teléfonos? Nuestro 
amigo Jordi Farando ha desarro- 
llado un magnífico programa 
que seguramente os será de gran 
utilidad. 
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20 
30 
40 
50 
60 
70 
80 
90 



**************************** 



AGENDA TELEFONICA 
por 

JORDI FARANDO GENER 



' **************************** 

'Pantalla inicial 



THEN130 
previ as 



170 
180 
190 

200 



SCREEN0:KEYOFF: FORB=0TO22: FORA=0 
T039 : LOCATE A , B : PR I NT " * " : NE X TA , B 
100 LOCATE 5, 9: PRINT" CONECTA ' LA UN 
IDAD DE DISCO " 

110 LOCATE 5, 10: PRINT" Y COLOCA UN 
DISCO " 

120 LOCATE 3, 11 SPRINT" Cuando estés 

listo pulsa Space " 
130 K*=INKEY$: IFK*< >" 
140 Ti jar condiciones 
150 SCREEN0: WIDTH40: COLOR 15, 1,1 8 KE 
Y OFF : CLEAR 1000 
160 ON KEY GOSUB 1580: KEY ( 1 ) ON 
ON STOP GOSUB 1730:STOPON 
ON ERROR GOTO 1750 
OPEN"FICHAS. DAT"AS#1LEN=120 
FIELD#1,30 AS NQM*,40 AS ADR*, 1 
AS TEL*,40 AS COM* 
210 7 Ver menú principal 
220 CLS:F0RTS=1T03: LOCATE 16, TS: FOR 
N9=1T08: PRINT"*" ; : NEXTN9, TS: L0CATE1 
6, 2: PRINT"* Menú *" 

230 LOCATE 0, 5: PR INT" -Programa Agen 
da by Jordi Faraudo Gener" 
240 L0CATE6,7:PRINT". Introducir nu 
evos datos" 

250 LOCATE 6, 8: PRINT" . Ver nombres* 
n2 tel. ordenados" 
260 LOCAJE 6, 9: PRINT". 

sab. parte de ellos" 
270 L0CATE6 ,10: PR INT". 
tos" 

280 LOCATE 6, 11: PRINT". Acabar" 

290 LOCATE 0, 17: PRINT"Esco ja con te 

cías cursor+sel ect " 

300 LOCATE 0, 14: PRINT "Par a imprimir 
lo que sale por pantalla en qualqu 
íer momento pulse f 1 " : K=7 



Buscar datos 
Modificar da 




310 IF K>11 THEN K=7 : L0CATE6 ,11: PR I 
NT". " 

320 LOCATE 6 , K : PR I NT " * " : I FK< >7THENL 
0CATE6 , K- 1 : PR I NT " . " 

330 F*=INKEY*: I FF*= " " THEN330ELSE I FF 
*=CHR* (31) THENK=K+ 1 ELSE IFF*=CHR*< 
30) THENK=K-1 : L0CATE6, K+l : PRINT" . ": I 
FK<7THENK=1 1 

340 IFF*=CHR*<24) THEN360 
350 F*="":GOTO 310 

360 ON K-6 GOSUB 380,1120,640,1310, 
1540 

370 F*="":F1*="":N1=0: J=3:G0T0 210 
380 'Subprograma para la introducci 
ón de .datos 

390 CLS: M= (LOF ( 1 ) / 120) +1 : FORN=MTO30 
72 

400 FORTS=0TO2: LOCATE 9, TS: F0RN9=1T 
027: PRINT"*"; : NEXTN9 , TS : L0CATE9 , 1:P 
RINT"* Introducir nuevos datos *" 
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410 L0CATE2,3:PRINT"Para volver al 
mena pulsa <Return>" 

420 PRINT"Por -favor, las iniciales 
en mayúsculas. " 

430 PR I NT : P*= " " : S*= " " : L*= "":F1$= " " : 
PRINT: PRI NT "Nombre: ( Apel 1 i do/Apel 1 i 
do, nombre) : 

440 LINEINPUT P*: IF LEN(P*)>30 THEN 

P*=LEFT*(P*,30> 
450 IF P*="" THEN M=N : RETURN 
460 PRINT: PRINT "Dirección:" 
470 LINEINPUT 5*: IF LEN(S*)>40 THEN 

S*=LEFT*(S*,40) 
480 PRINT: PRINT"Tel éf ono" : INPUT L*: 
IF LEN(L*>>10 THEN L*=LEFT* < L* , 1 > 
490 PRINT: PRINT " Comentar i os: " 
500 LINE INPUT C*:IF LEN(C*)>40 THE 
N C*=LEFT*(C*,40) 
510 GOSUB 1560 
520 'Visual i zación datos 
530 CLS: PRINT: PRI NT "-Estos son los 
datos introducidos:" 

540 PR I NT : PR I NT " Nomb re:": PR I NT " " 

: PRINT P* 

550 PRINT: PRINT"Di recci ón: " : PRINT" - 
W " 

560 PRINT S* 

370 PRINT: PRINT"Tel éf ono: ": PRINT" — 
W " 

580 PRINT L* 

590 PRINT: PRINT"Comentar i os: ": PRINT 
" •■ 

600 PRINTC*: PRINT: PRI NT "Cor recto (S 
/N) " 

610 F1*=INKEY*: I FF 1 *= " " THE;N6 1 

620 IF F1*="N" ORFl*="n"THEN PRINT: 

GÜTG 430 

630 PUT #1,N: CLS: NEXT N : M= ( LGF < 1 ) / 1 
20) +1: RETURN 

640 'Subprograma para buscar datos 
650 J=3: CLS: FORTS=0TO2: LOCATE 9,TS: 
F0RN9=1T024: PRINT"*" ; : NEXTN9, TS: LOC 
ATE9, 1 : PRINT" * Buscar datos por clav 
e*" 

660 PRINT: GOSUB 1530: PRINT 

670 ' Vi sual i zaci ón submenú 

680 PRI NT "Que dato /parte de dato s 

abes?" 

690 LOCATE 1 1 , 9: PRINT" 1 . Nombre" 
700 LOCATE 11, 10: PRI NT "2. Dirección: 

u . 

710 LOCATE 11, 11:PRINT"3. Teléfono": 
L0CATE11, 12: PRINT "4. Comentario" 
720 LOCATE 9, 15: PRINT"Escoge U/2/3 
/4) " 

730 F1*=INKEY*: IFF1*=" "THEN730ELSE1 
FF1*=CHR* (27) THENRETURN 
740 IF F1*<"1" OR Fl*>"4" THEN RETU 
EN 



750 ON VAL(F1*) GOSUB 780,870,960,1 
050 

760 F 1 *= " " : F2*= " " : N 1 =0 : GOTO 650 
770 'Buscar datos sabiendo el nombr 
e 

780 CLS: PRINT "Nombre o parte del n 
ombre: " 

790 LINEINPUT PP*: IF LEN(PP*)>30 TH 

EN PP*=LEFT*(PP*,30) 

800 IF PP*="" THEN RETURN 

810 GOSUB 1660 

820 FOR N=l TO LOF(1)/120 

830 GET# 1 , N : P*=NOM* : S*=ADR* : L*=TEL* 

: C*=COM* 

840 P=LEN(PP*) :JF LEFT* ( P* , P >-=PP* T 
HEN GOSUB 1690 
850 PRINT: NEXT N: PRI NT 
860 GOSUB 1500: RETURN 
870 'Buscar por dirección 
880 CLS: PRINT "Dirección o parte de 
ella: " 

890 LINE INPUT SS*: IF. LEN (SS*) >40 T 

HEN SS*=LEFT* (SS*, 40) 

900 IF SS*="" THEN RETURN 

910 GOSUB 1660: FOR N=l TO LOF(1)/120 

920 GET#1 , N: P*=NOM*: S*=ADR*: L$=TEL* 

:C$=COM* 

930 S=LEN(SS*) : IF LEFT* (S*, S) =SS* T 

HEN GOSUB 1690 

9.40 PRINT: NEXT N: PRINT 

950 GOSUB 1500: RETURN 

960 'Buscar por teléfono 

970 CLS: PRINT"Tel éf ono o parte de é 

1 : " : INPUT LL* 

980 IF LL*="" THEN RETURN 

990 GOSUB 1660: FOR N=l TO LOF(1)/120 

1 000 GETtt 1 , N : P*=NOM* : S*=ADR* : L*=TEL 

*: C*=COM* 

1010 L=LEN (LL*) : IF LL*=LEFT* (L*, L) 

THEN GOSUB 1690 

1020 PRINT: NEXT N 

1030 PRI NT: GOSUB 1500: RETURN 

1040 'Buscar sabiendo el comentario 

1050 CLS : PR I NT " Comentar i o o parte d 

e él : " : LINEINPUT CC* 

1060 IF CC*="" THEN RETURN 

1070 GOSUB 1660: FOR N=l TO LDF(l)/i2 



1 080 GET# 1 , N : P*=NOM* : S*=ADR* : L*=TEL 
*: C*=COM* 

1090 C=LEN (CC*) : IF CC*=LEFT* (C*, C) 

THEN GOSUB 1690 

1100 PRINT: NEXT N 

1110 PRI NT: GOSUB 1500: RETURN 

1120 'Subprograma impresión de dato 

s en pantalla 

1130 CLS: FORTS=0TO2: LOCATE 4,TS:F0R 

N9= 1 T03 1 : PR I NT " * " ; : NEXTN9 , TS 

,1 140 LOCATE 4.1:PRINT"* Visualizar 1 
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1790 IF RR=70 THEN F;RINT"No hay dis 
col!" 

1800 IF RR=68 THEN PRINT"Disco prot 

egido contra escritura!!!" 

1810 IF RR=53 THEN PRINT"Los datos 

no están en este disco":RR=70 

1820 IF RR=67 THEN PRINT"Los datos 



no caben en este disco" 

1830 IF RR>70 GR RR<66 THEN PRINT"L 

ínea " ; ERL ; " (o línia relacionada c 

on ella) mal copiada" 

1840 PRINT:PRINT"Pulsa una tecla" 

1850 K*=INKEY*: I FK*= " " THEN 1 850ELSE 

1860 RESUME 220 



Test de listados 



TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa corres- 
pondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. 
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58 


280 


-172 


550 


-100 


820 


- 52 


1 090 


-216 


1 360 


-145 


1 630 


-105 


20 




58 


290 


-158 


560 


- 8 


830 




1 100 


-156 


1370 


- 88 


1640 


-139 


30 




58 


300 


-142 


570 


-170 


840 


- 51 


1110 


- 15 


1380 


- 33 


1650 


- 75 


40 




58 


310 


-182 


580 


- 1 


850 


-103 


1 120 


- 58 


1390 


-144 


1660 


- 58 


50 




58 


320 


- 38 


590 


-221 


860 


- 68 


1 130 


-190 


1400 


-171 


1670 


-214 


60 




58 


330 


- 1 06 


600 


- 52 


870 


- 58 


1 140 


- 146 


1410 


-147 


1680 


-251 


70 




58 


340 


- 66 


610 


- 85 


880 


-157 


1 150 


- 48 


1420 


-232 


1690 


- 58 


80 




58 


350 


-165 


620 


-197 


890 


- 37 


1 160 


-108 


1430 


-221 


1700 


-110 


90 




53 


360 


-252 


630 


- 98 


900 


-240 


1 170 


— ^42 


1440 


- 10 


1710 


-210 


100 




125 


370 


-136 


640 


- 58 


910 


-139 


1 1 80 


-180 


1450 


-131 


1720 


-142 


1 10 




97 


380 


- 58 


650 


-231 


920 


-220 


1 190 


- 58 


1460 


-123 


1730 


- 58 


120 




24 


390 


- 46 


660 


- 48 


930 


- 72 


1200 


- 56 


1470 


-104 


1740 


-142 


1 30 




10 


400 


-145 


670 


- 58 


940 


-103 


1210 


-207 


1480 


- 41 


1 750 


- 58 


140 




58 


410 


- 43 


680 


-177 


950 


- 68 


1220 


- 65 


1490 


- 58 


1760 


- 64 


150 




60 


420 


-183 


690 


- 9 


960 


- 58 


1230 


-217 


1500 


-138 


1770 


-239 


160 




44 


430 


- 77 


700 


-163 


970 


-254 


1240 


-188 


1510 


-219 


1780 


- 86 


170 




231 


440 


-185 


710 


-246 


. 980 


-226 


1250 


- 52 


1520 


- 58 


1790 


-117 


180 




174 


450 


- 94 


720 


- 73 


990 


-139 


1260 


-209 


1530 


- 44 


1800 


-155 


190 




121 


460 


-157 


730 


- 53 


1000 


-220 


1270 


-209 


1540 


- 58 


1810 


- 73 


200 




175 


470 


-217 


740 


-235 


1 1 


— T*— 


1280 


- 84 


1550 


-177 


1820 


-212 


210 




58 


480 


- 5 


750 


-182 


1020 


-156 


1290 


-142 


1560 


- 58 


1830 


- 26 


220 




189 


490 


-•94 


760 


-237 


1 030 


- 15 


1300 


- 58 


1570 


-233 


1840 


—242 


230 




102 


500 


-153 


770 


- 58 


1040 


- 58 


1310 


- 38 


1580 


- 58 


1850 


-181 


240 




78 


510 


-185 


780 


-142 


1 050 


- 83 


1320 


-167 


1590 


- 79 


1860 


-145 


250 




6 


520 


- 58 


790 


-249 


1060 


-208 


1 330 


- 41 


1600 


-241 






260 




85 


530 


- 1 90 


800 


-234 


1 070 


-139 


1340 


- 96 


1610 


-148 


TOTAL: 


270 




26 


540 


-147 


810 


- 29 


1080 


-220 


1350 


- 13 


1620 


-168 


22181 
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Programa 



datos ordenados *" 

1150 PRINT: GGSUB 1530:PRINT 

1160 PRINT "Los nombres i n£s de tel 

. (por orden alfab.) los quieres po 

r pantalla o impresora (P/I) (Ajusta 

r impresora a 40 columnas)" 

1170 F2*=INKEY$: IF F2*="" THEN 1170 

ELBE IF F2$*CHR* < 27 ) THEN RETURN 
U80 IF LEFT* <F2$, 1 > ="p" GR LEFT*(F 
2$,1)="P" THEN F2*="P" ELSE IF LEFT 
* <F2$; 1 ) -"i " OR LEFT$ (F2$, 1 ) =" I " TH 
EN F2*="I" 
1190 'Ver datos 
1200 CLS: GÜSUB 1 660 : B=65 : J=3 
1210 FÜR N=l TO LOF(1)/120:GET #1,N 
1220 P$=NOM$: S*=ADR*: L*=TEL*: C*=C0M 

1230 IF NI =9 THEN N1=0: J=3: GOSUB 15 
00:CLS:GOSUB1660 

1240 IF ASC(P*)=B THEN 1250 ELSE 12 
60 

1250 LOCATE0, J : PRINTP*; L*: J=J+2: Nl= 
Nl + 1 

1260 NEXT N 

1270 B=B+1:IF B>90 THEN GOSUB 1500 
ELSE 1210 

1280 IFF2*="I"THEN GOSUB 1590 
1290 RETURN 

1300 ' Subprograma para modificar da 
tos 

1310 CLS: FORTS=0TO2: LQCATE9, TS: FORN 
9= 1 T022 : PR I NT " * " ; : NEXTN9 , TS : LOCATE 
9,1: PRINT"* Actual i tzar datos *" 
1320 L0CATE5, 4: PRINT "Vuelta a menú 
p or < Return > " : L0CATE3 , 6 
1330 INPUT" Introduce el n2 de orden 

de los datos";Nl 
1 340 I F NI >L0F ( 1 ) / 1 20GRN 1 =0THENRETU 
RN 

1350 GET#1 , NI : P*=NOM*: S*=ADR*: L*=TE 
L$:C*=COM* 

1360 PRINT: PRINT"N° de orden: ";N1: 

PRINT "Nombre: "; P* : PRINT "Di rec . : ";S 

*: PRINT "Tel éf ono: " ; L*: PR I NT" Coment- 
ar ios: " ; C* 

1370 PRINT: PRINT"Hay algo a modific 

ar <No=< RETURN >) ?" 

1380 PRINT"Nombre: " ; P* 

1390 LINE INPUT D*:IFD*<>"" THEN P* 

=D* 

1400 D*="":PRINT"Direc. : " ; S* 

1410 LINE INPUT D*:IF D*<>"" THEN S* 

1420 D*="": PRINT "Teléfono: " ; L* 
1430 INPUT D*:IF D*<>"" THEN L*=D* 
j 440 D$="":PRINT"Comentarios: " ; C*. 




1450 LINEINPUT D*: IF D$<>"" THEN C* 

1460 D*="": GOSUB 1560: CLS: PRINT "La 
introducción bajo n2 orden "; N 1 ; "es : 

1470 PRINT"Nombre: " ; P*: PRINT"Di r ec 
ción: ";S$: PRINT "Teléfono: ";L*:PRIN 
T"Comentarios: ";C*: PUT#1,N1 
1480 GOSUB 1500: N1=0: GOTO 1310 
1490 'Congelación de pantalla 
1500 L0CATE6, 22: PRINT "< Por favor pu 
Isa una tecla)" 

1510 B*=INKEY*:IF B*="" THEN 1510 E 
LSE RETURN 

1520 ? Advertencia general 

1530 PRINT "Vuelta al menú per <ESC> 

": RETURN 

1540 'Acabar 

1550 CLOSE:SCREEN0:KE YON: COLOR 15,4 
,4:END 

1560 ' Apertura archivo y asignació 

n de datos a un registro 

1570 LSET NOM*=P*:LSET ADR*=S*:LSET 

TEL*=L*:LSET COM*=C* : RETURN 
1580 7 * Impressión * 



1590 L0CATE6, 22: PRINT" 

■i 

1600 ZX7.=BASE<0> 
1610 FOR ZS7.=ZX7. TO ZS7.+959 
1620 LPRINT CHR*<27) ; "A"; 
1 630 Z A7.=VPEEK ( ZS% ) 

1640 IF ZA7.>31 THEN LPRINT CHR* ( ZA7. 
); ELSE LPRINTCHR*(1) ; CHR* < ZA7.+64) ; 
1650 NEXT: RETURN 

1660 'Títulos exposición de datos 
1 670 CLS : LOCATE 1,0: PR I NT " Nom " : LOCAT 
E30, 0: PRINT" tel éf on" 

1 680 LOCATE 1 , 1 : PR I NT " " : LOCATE30 , 

1 : PRINT" " : RETURN 

1690 "Subrutina escrivir datos 
1700 LOCATE0, J: PRINT P*; TAB (22) ; L*: 
PRINT "Di rec . : " ; S*: PRINT"Comentar . : 
";C*; "n£ orden: " ; N: N1=N1+1 : J=J+7 
1710 IF Nl=2 THEN N1=0: J=3: GOSUB 15 
00: CLS: GOSUB 1660 
1720 RETURN 

1730 'Proceso de interrupción CTRL- 
STOP 

1740 K=11:G0T0 360 

1750 ' Rutina proceso de errores 
1760 RR=ERR: PRINT: IF RR=60 THEN PRI 
NT"E1 disco no está formateado" 
1770 IF RR=66 THEN PRINT"Disco agot 
ado" 

1780 IF RR=69 THEN PRINT"Error d " en 
trada o ¿salida de datos" 
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Programa 



iPor Borja López Lamadrid 



NESTOR 



Néstor es un camarero muy ex- 
perimentado. Su habilidad con 
la bandeja no tiene parangón. 
Descubre cómo Néstor realiza 
su tarea cotidiana con la mayor 
naturalidad del mundo. 



10 
20 
D 

30 
40 
50 
60 
70 
80 
90 

1 00 



REM 
REM 



BORJA LOPEZ DE LAMADRI 



REM PRESENTA: NESTOR 

REM 

COLOR 1, 15, 15 
SCREEN 2 
A=90:B=55:C=-5 
PSET (A, B) , 1 
REM ERENTE 
DRAW" D2G1D2G 1D6G2D2G2D2G2F IR 1D1 



F1R1D1F1D1F2D6G1L1G1 
1 10 PSET (A, B) , 1 

1 20 DRAW "D2G1D2G 1 D6G2D2G2D2G2U 1 F 1 R i 

D1F1R1D1F1D1F2D1D6G1L1G1 

130 PSET (A, B) , 1 

1 40 DRAW " D2G 1 D2G 1 D6G2D2G2D2G2F 1 R 1 D3 
G 1 D 1 G 1 L 1 R6L3D3R2U3 
150 PSET (A, B) , 1 

160 DRAW" D2G 1D2G 1 D6G2D2G2D2G2F IR 1D3 
G1D1G1L1 R6L6F 1 R 1 F2D2R4L4D2F 1 R2E 1 
170 PSET (A, B) , 1 

180 DRAW"D2G1D2G1D6G2D2G2D2G2F1R1D1 



F1R1D1F1D1 F2D6D 1 G 1 D2G 1 D2G 1 D2G 1 D2G 1 E 
2G1D2F1D1F2R1F1R3E1R1D1L1E1R1D1 
190 PSET (A, B) , 1 

200 DRAW " D2G i D2G 1 D6G2D2G2D2G2F 1R1D3 
G1D1G1L1 R6L6F 1 R 1 F2D2R4L4D2F 1 R2E 1 G 1 Lj 
2G2D6BD15D2" 
210 REM LABIO 
220 DRAW " F 1 D5R3F 1 R2E 1R7E1 BD3BL3L4G2 
L2H2L1H1 " : REM PARTE INFERIOR 
230 DRAW " BD5BR 1 F3R4E 1 R 1 E 1 R 1 E 1 
240 REM BARBILLA 
250 DRAW " BL 1 2BD5D3G 1 F 1 D8F3R4F 1 R6E3R 
3E3R4E1R1E1R1E3E1R1E1R1E1R1E4U2E4U4I 
E2U10E1U1E1U1E1 
260 REM oreja 
270 DRAW"BE5R3E3U2E1U2E1U2E1U2E1U6^ 
4G5L1G3D5G2L1G2L1U6H3U1H2U2H2U5H1E1 
U3H1E1U2H2U1E1U4 

280 REM PELO ENCIMA DE LA FRANTE 
290 DRAW " L3G 1 L 1 H3L2G3H3L2H 1 L2G 1D1G1 
L 1 L2U3L3G 1L2H1L4G1 H2E 1 U8E 1 R 1 U2E3R 1 Ü 
2R2E4R4E2R2E2R6E2R8F2R7E2R5F2R3F2R: 
F3D5F3D5F2D7D5F 1 D3G2D5G 1D2G1D2G1 D3G 





\ f 
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1 " 

300 REM CEJA 

3 1 DRAW » BL57BD5R 1E1R2E1 R6F2R3U 1 L3H 

2L6G1L2G1L1U1 

320 REM OJO 

330 DRAW " BD5BR3E 1 R 1 E 1 R2F 1 R2F2R2BL3B 
D2L2H 1 L3G 1 E 1 R2U2L2D3R5L2BU2U 1 BL4U2 
340 REM OJERA 

350 DRAW"BD7BL2R10E2" : REM SOMBRADE 
LA NARIZ 

360 DRAWBL17DD6BD9F1R2D3 
370 REM MENTON 

380 DRAW " BR30BU20L7D2G 1 D 1 5G2L4D2F3D 

2F1D6G3R2L4G3L5 

390 REM CUELLO 

400 DRAW"BE27BR1 3D36BD2 

410 REM CUELLO CAMISA 

420 LINE (148, 148-9) ~ (127, 160-9) , 1 

430 LINE (127, 160-9) -(148, 172-9) , 1 

440 LINE (148, 1 72-9 ) - ( 1 48 , 148-9) , 1 

450 PSET(127, 160-9) , 1 : DRAWL2G1L3H1 

L2 

460 LINE( 118, .160-9) - (111, 156-9) , 1 

470 LINE (118, 160-9) (101, 172-9) , 1 

480 LINE ( 101 . 172-9) - ( 101 , 160-9) , 1 
490 REM PAJARITA 
500 PSET (125, 161-9) , 1 
5 1 DRAW " F 1 D4G 1 L 1 G 1 L 1 H 1 L 1 H 1 U4E 1 
520 LINE (125, 167-9) -(135, 175-9) , 1 
530 LINE (135, 175-9) -(135, 165-9) , 1 
540 LINE (120, 167-9) -(110, 175-9) , 1 
550 LINE (110, 175-9)- (110, 165-9) , 1 
560 REMPAINT(118, 167-9) , 1: PAINT (127 
, 167-9) , 1 

570 REM PINTAR EL PELO 

REM PAINT (130, 40-9) , 1 



590 REM CIRCULO 

600 C I RCLE ( 1 25 , 1 04 ) , 1 03 

610 CIRCLE (125, 104) ,96 

620 PAINT (125, 2) , 1 

630 REM LETRA 

640 OPEN "GRP : "AS#1 

650 PSET (85, 180) , 1 

660 PRINT#1, " 

670 REM CIERRE DEL CIRCULO 

680 L I NE ( 7 1 , 1 92 ) - ( 1 80 , 1 92 ) , 1 

S90 REM HOMBRO 

700 L I NE ( 1 47 , 1 33 ) - ( 220 , 1 33 ) , 1 

710 LINE ( 147, 132) - (220, 132) , 1 

720 LINE (30, 133) -(85, 133) , % 

730 LINE (30, 132) - (85, 132) , 1 

740 REM LINEA DE AMERICANA 

750 PSET (94, 151) , 1 

760 DRAW " D 1 0F 1 D 1 0F 1 D 1 0F 1 D7 

770 PSET (80, 133) , 1 

780 DRAW " D 1 0F 1 D 1 0F 1 D 1 0F 1 D 1 0F 1 D 1 0F 1 D 
7 

790 PSET (144, 161) , 1 

800 DRAW " D 1 0G 1 D 1 06 1 D 1 08 1 D7 

810 PSET (159, 133) , 1 

820 DRAW " D 1 0G 1 D 1 0G 1 D 1 08 1 D 1 0G ID 1061 D 
7 

830 REM PINTAR AMERICANA 

840 REMPA I NT < 60 , 1 60 ) , 1 

850 REMPA I NT ( 1 70 , 1 60 ) , 1 

860 PAINT (90, 160) , 1 

870 PAINT ( 150, 160) , 1 

880 REM LINEA DE LOS TIRANTES 

890 LINE (80, 131) -(85, 131) , 1 

900 LINE (159, 131)- (146. 131) , 1 

910 COLOR 1 

920 GOTO 920 



I Test de listados 



TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa corres- 
pondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. 
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290 


- 16 


430 


-140 


570 


- 


710 


-140 


850 - 


20 


- 


160 


-191 


300 


- 


440 


-149 


580 


- 


720 


-146 


860 -146 


30 


- 


170 


- 


310 


-127 


450 


- 76 


590 


- 


730 


-144 


870 -206 


40 


- 


180 


-142 


320 


- 


460 


~ 78 


600 


-222 


740 


- 


880 - 


50 


- 99 


190 


- 


330 


-198 


470 


- 84 


610 


-215 


750 


-144 


890 -192 


60 


-216 


200 


- 44 


340 


- 


480 


- 67 


620 


- 25 


760 


-175 


900 - 76 


70 


-190 


210 


- 


350 




490 


- 


630 


- 


770 


-112 


910 -207. 


80 


- 


220 


-130 


360 


-197 


500 


-197 


640 


-224 


780 


-231 


920 - 50 


90 


- 


230 


-199 


370 


- 


510 


- 39 


650 


-164 


790 


-204 




100 


-182 


240 


- 


380 


-179 


520 


-135 


660 


- 20 


800 


-178 




1 10 


- 


250 


- 89 


390 


- 


530 


-143 


670 


- 


810 


-191 




120 


-177 


260 


- 


400 


- 45 


540 


-105 


680 


-144 


820 


-236 


TOTAL: 
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- 


270 


-233 


410 


- 


550 


- 93 


690 


- 


830 


- 


140 


-106 
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lEquipo TRON/Rony Van Ginkel 



COBRAS ARC 
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Una neblina oscurecía el horizon- 
te. Me encontraba exhausto y 
desesperado. El señor de las llu- 
vias me había dicho que tenía que llegar 
al Templo Cobra, donde encontraría un 
fabuloso tesoro; pero hasta ahora sólo 
había podido encontrar un buen resfria- 
do y un agudo dolor de cabeza. 

Avanzaba a ciegas, no tenía ni la me- 
nor ¡dea de dónde me encontraba, ni 
esperanzas sobre averiguarlo cuando, 



llhTi 




llegando a la orilla del mar, mi dedo 
gordo encontró una barca semienterrada 
en la arena. No se puede decir que a mi 
dedo le sentara muy bien el hallazgo; 
pero había que admitir que era todo un 
avance. La guardé en un bolsillo de mi 
monedero (es que en estas tierras las 
barcas son extremadamente pequeñas) y 
proseguí mi búsqueda. 

Al cabo de un tiempo me encontré un 
fabuloso reloj de arena, pensé en dejarlo 
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Sobre estas líneas el mapa completo de este original juego 
gráfico conversacional. Atención a lo que escucháis mien- 
tras ejecutáis el juego, «puede daros una agradable sor- 
presa» y otra cosa más: Siguiendo al pie de la letra las 
instrucciones del texto conseguiréis llevar a buen término 
la aventura. 



en su sitio, pero finalmente lo guardé. 

Por fin logré encontrar una salida al 
mar. Entre lo acantilados encontré una 
pequeña cala, donde pude por fin utilizar 
mi barca. Al poco tiempo ya estaba en 
el otro lado del mar. Creía que había 
descubierto América, pero sólo me en- 
contré con un laberinto, del cual era 
bastante difícil salir con vida. 

Después de una semana de caminar, 

me encontré con Drágora, la hechicera, 
la cual me quiso amable- 
mente cambiar el reloj de 
arena por una pequeña llave 
de hojalata. Me negé con 
suavidad, pero entonces ella 
sacó un puñal, lo cual me 
convenció finalmente a ac- 
ceder a realizar la transac- 
ción comercial. 

Después de un tiempo de 
caminar, cuando apoyado en 
una pared me dispuse a 
echar una cabezadita, la pa- 
red se abrió, entrando en el 
templo mágico, en el cual 
participé en un concurso de 
magia con el que gané una 
hermosa y pesada espada, 
con la cual salí un poco con- 
fuso del templo. 

Ya empezaba a pensar 
que todo iba a acabar bien 
cuando me encontré cara a 
cuerno con un dragonazo de 
mucho cuidado, pero yo, 
siendo un guerrero experto, 
blandí firmemente la espa- 
da, con lo que murmurando, 
levanto el vuelo y puso 
rumbo a tierras lejanas. 

Avancé un poco más y me 
encontré ante las puertas 
del Templo Cobra. Sacando 
la pequeña llave, la introdu- 
je en la cerradura. En un 
principio se atascó, pero 
por suerte tenía un poco de 
aceite y engrasándola, volví 
a intentarlo, logrando esta 
vez que las puertas se abrie- 
ran de par en par, encon- 
trándome de narices con el 
tesoro del Templo Cobra- 



Este juego se sale comple- 
tamente fuera del estilo de 
DINAMIC, ya que es una 
aventura gráfico- 
conversacional, no en el 
más puro estilo (en el cual 
hay que introducir mediante 
frases las acciones que se 
desean realizar), sino que 
las acciones se manejan me- 
diante iconos (unos símbo- 
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los en los cuales se desplaza un cursor 
eligiendo el deseado), lo cual limita en 
gran parte la libertad de acción así como 
la dificultad, ya que en las verdaderas 
aventuras gráfico-conversacionales, hay 
que encontrar la palabra o palabras jus- 
tas para cada situación, cosa que no se 
da en este juego. 

Nuestra misión es la de encontrar el 
tesoro del Templo Cobra. Para ello de- 
bemos recorrer unas 70 pantallas encon- 
trando aquellos objetos que necesitamos, 
los cuales son: 

—Barca: La encontraremos en la orilla 
del mar y nos servirá para cruzarlo. 

— Sílex: Nos permitirá destruir al he- 
chicero del templo. 

— Espada: Con ella podremos envene- 
nar al principe cobra. 

— Reloj de arena: Nos servirá para 
intercambiárselo a Drágora por una... 

— Llave: Con ella podremos abrir las 
puertas del templo cobra. 

Los personajes con los que nos pode- 
mos encontrar son: 

— Wanbel: Señor de la lluvia, nos apa- 
recerá apenas hayamos dado un paso, 
explicándonos nuestra misión. 

— Drágora la hechicera: Es fundamen- 
tal encontrarla, ya que sin ella no podre- 
mos abrir la puerta del templo. 

— El principe cobra: Se nos aparecerá 
en forma de serpiente, nos matará a no 
ser que llevemos la copa de oro. 

—El hechicero del templo: Se nos 
aparecerá en forma de un murciélago 
entre llamas, para matarlo solo nos hace 
falta el Sílex. 

— Los enanos: nos darán consejos úti- 
les, conviene no atacarles. 

— Gurka, el bárbaro: Nos quitará la 
llave de las manos apenas aparezca, por 
lo cual conviene eliminarlo lo antes po- 
sible. 

— Los dragones: Se parecen a una 
enorme lagartija con alas y con un meche- 
ro en lugar de lengua; pero por suerte 
son sumamente alérgicos a una es- 
pada. 

— Glauder, el filósofo: Esta vil criatu- 
ra, con sus sabios consejos logrará me- 
terte de cabeza en el lodo o cosas peores 
todavía, no le hagas caso. 

Las acciones a realizar son 14: 
— Moverte en las cuatro direcciones 
(oeste, norte, sur, este). 
— Examinar. 

— Grabar la aventura en el estado en 
el que nos encontremos. 




— Parar el juego. 
— Coger un objeto. 

— Examinar el oráculo, el cual nos 
dará información sobre nuestro es- 
tado. 

— Usar un objeto. 

— Señalar la dirección por donde se 
encuentra el templo cobra. 
— Entrar en el templo mágico. 
— Salir del templo mágico. 
— Poner/quitar la música. 

Como habéis podido comprobar, las 
opciones de este juego son muchas y 
muy variadas, pero lamentablemente no 
posee mucha dificultad a la hora de coger 
un objeto u encontrar a tal personaje, ya 
que o está o no está, no se da el caso en 
el que tengamos que darle una patada a 
una piedra para encontrar un anillo o 
similar; pero esto se suple gracias a la 
gran cantidad de pantallas que compren- 
de este juego. 

Cada vez que lleguemos a una panta- 
lla, nos aparecerá un gráfico de baja 
resolución que nos representa el lugar o 
personaje ante el cual estamos, aunque 
sean bastante repetitivos, los gráficos 
son bastante buenos. 

El manejo de los iconos es muy fácil 
y simple, pero tienen el defecto de dejar 
muy poco sitio para el texto (3 líneas), 
lo que hace que las descripciones y textos 
sean extremadamente cortos. 

Un detalle que le añade cierta origi- 
nalidad al juego es el que podamos apa- 
recer en 3 sitios distintos (Hyrga, greys- 
tone o yendha). 

A continuación indicaremos las claves 
del mapa y algunos consejos útiles a la 
hora de enfrentarnos a esta aventura. 



(A) Son los posibles lugares donde 
comienza la aventura. 

(B) No tiene salida y te hundes en el 
mar. 

(C) En la orilla del mar se encuentra 
la balsa. Con ella se puede navegar por 
todo el mar. 

(D) Solamente se mata con el Sílex. 

(E) Estas pantallas son aleatorias. 
Tanto puede aparecer Gurka el bárbaro, 
drágora la hechicera o nada, tan sólo un 
corredor del laberinto. 

Si no se tiene la espada para matar a 
Gurka, éste te puede robar la llave (si se 
posee), y para recuperarla habrá que 
buscar a Gurka por todas las pantallas 
y matarlo. 

Si nos encontramos con Drágora (aun- 
que es aleatoria) y poséenos el reloj de 
arena, ésta nos lo cambiará por la llave 
del castillo. 

(F) Al escoger la puerta izquierda del 
menú de objetos se encontrará una en- 
trada oculta. La puerta derecha, por el 
contrario, será la de salida. 

(G) Los pozos de lodo son trampas 
mortales. 

(H) Con la copa de oro se envenena 
al príncipe Cobra. 

(I) Pantallas posibles donde se en- 
cuentra servax. Es aconsejable no matar- 
lo, ya que de hacerlo, cae la maldición 
sobre ti y mueres. 

(J) Aquí se encuentra sívilix, el enano 
púrpura. Es aconsejable no matarlo. 

(K) Para acabar con el Dragón hay 
que utilizar la espada. 

(L) Solamente con la llave se puede 
abrir la entrada de la puerta del templo 
Cobra; aunque para ello habrá que insis- 
tir varias veces con la llave, ya que la 
puerta está atascada en un principio. 

(M) Hay que prescindir de los conse- 
jos que puedan dar Glaudler, pues sola- 
mente contará mentiras. 

RECOMENDACIONES 

— Todos los objetos están distribuidos 
aleatoriamente, exceptuando la balsa. 

—Aunque disponiendo de la balsa se 
pueda navegar'por el mar, no se reco- 
mienda frecuentarlo demasiado. 

— En cordilleras y desiertos, y en el 
interior de los castillos se encuentran 
algunos objetos de utilidad. 

— Hay que procurar no entrar direc- 
tamente en las pantallas donde no se 
disponga de arma necesaria para acabar 
con los enemigos. 
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Por Angeles Picajo 



Tierra 



¿Quieres ver cómo gira el mun- 
do? Es muy fácil gracias a este 
mini-programa y a tu MSX. Se 
trata de un ejemplo muy bien 
realizado de animación en los 
MSX de primera generación. 



(C) 1.986 * Angeles * TIERRA 



10 ■ 
20 ' 

30 ' 

40 CLEAR 3000 
50 COLORIS, 1,1: SCREEN 2,2 
60 LINE<0,0)-<255, 191) , 15, B 
70 • 
80 » 
90 
100 
1 10 
120 



POSICIONAMIENTO ESTRELLAS 



FOR B»l TO 150 
H7.=RND(G) *255: V/.=RND 
RND(G) *16 
130 PSET(H"/.,V/.) ,C7. 
140 NEXT G 
150 ' 
160 ' 
170 
180 
190 
200 
210 



CREACION SPRITES 



FOR M-0 TO 11 
A*="":FOR H=l TO 32 
READ A: A*=A*+CHR*(A) 
220 NEXT H:SPRI-TE*(M)=A* 
230 NEXT M:SPRITE*(12)=SPRITE*(11) 
240 " 
250 • 

260 ' FORMACION PLANETAS 

270 ' 

280 CIRCLE( 45,90) ,9,9, , , 1.2 

290 PAINT(45,90) ,9 

300 CIRCLE (80, 4*0) , 2, 14, , , 1 . 3 

310 PAINT(80,40) , 14 

320 CIRCLE (140, 185) ,3,2, 1 

330 PAINT(140, 185) ,2 

340 CIRCLE (255,0) ,60, 11 

350 PAINT(254, 1) ,11 

360 ' 

370 ' FORMACION TIERRA 

380 ' 

400 CIRCLE (136, 86) ,25,4, , , 1.2 
410 PAINT(133,86) ,4 
420 9 
430 ' 

440 » ROTACION TIERRA 

450 ' 




460 
470 
480 

490 
500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

661 

662 

670 

680 

R=R- 

690 



X=100: Y=62: G=74: H=74: R-73J 2=1 
H=H+1:G=G+1 
IFH*154 THEN Z=Z+1 
PUTSPRITE 0, (H, Y) ,1,0 
PUTSPRITE U <H+16,Y) ,1,1 
PUTSPRITE 2, (G+32, Y) , 1,2 
PUTSPRITE 3, (G+4B, Y) , 1,3 
PUTSPRITE 4, (H, Y+16) , 1,4 
PUTSPRITE 5, (H+16, Y+16) , 1,5 
PUTSPRITE 6, (G+32, Y+16) , 1,6 
PUTSPRITE 7, (G+4B, Y+16) , 1,7 
PUTSPRITE 8, (H, Y+32) , 1,8 
PUTSPRITE 9, (H+16, Y+32) , 1,9 
PUTSPRITE 10, (G+32, Y+32) , 1, 10 
PUTSPRITE 12, (H+32,25) ,0, 12 
PUTSPRITE 14, (H+32,80) ,0, 12 
PUTSPRITE 16, (H+32,0) ,0, 12 
PUTSPRITE 20, (H+32, 150) ,0, 12 
PUTSPRITE 22, (H+32, 50), 0,12 
PUTSPRITE 25, (H+32, 75) ,0, 12 
PUTSPRITE 13, (H+32, 180) ,0, 12 
AA*=INKEY*: IF AA*<>"" THEN END 
C0L0R15,4,4:C0L0R15, 1, 1 
IF Z=4 OR Z=8 THEN R=R-1 
IF H=154 AND INT(Z/2)=Z/2 THEN 
■1 

IF G=126 THEN G=46 
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Programa 



700 IF H=154 THEN H=R 

710 IF Z=4 AND G=75 THEN GQTG 460 E 
LSE GOTO 470 
720 ' 
730 ' 

740 ' DATAS MAPA MUNDI 

750 ' 

760 DATA 0,0,0,0,0,0,1,8,28,62,63,1 
27,255, 127,223, 15 

770 DATA 0, 0,0, 0,0, 64, 24, 96, 44, B, 14 
1 , 228 , 240 , 252 , 248 , 250 

780 DATA 0,0,0,64,96,2,0,0,88,252,2 
52,248,252, 120, 112,33 

790 DATA 0,0,4,0,0,0,0,16,0,0,0,0,0 
,0, 192, 192 

800 DATA 0,0,0,0,0,0,0,0,136,67,1,2 
4, 126, 124,255,207 

810 DATA 0,0,0,0,0,0,0,0,33,7,15,39 
,55,255,255,255 

820 DATA 0,0,0,0,0,128,18,8,130,183 
, 255, 255, 255, 255, 255, 255 
830 DATA 0,0,0,0,0,0,0,128,16,184,2 
52, 252, 248, 252, 250, 240 




Test de listados 



840 DATA 7,7,15,15,31,31,15,7,3,3,1 
, 0, 0, 0, 0, 

850 DATA 255 , 255 , 255 , 254 , 252 , 232 , 20 
0, 129,4,89, 194,224, 124,30,63, 127' 
860 DATA 0,0,0,0,0,0,0,1,0,0,0,0,0, 
0,0,0 

870 DATA 1,0,16,147,183,3,15,14,68, 
3, 15,95, 159,31, 13,0 

880 DATA 159,79, 255 , 255 , 255 , 255 ,167 
, 47, 135, 215, 255, 251 , 253, 254, 255, 255 
890 DATA 255,255,255,255,255,255,25 
5, 159, 199,243,225, 128, 0, 16, 136, 32 
900 DATA 255,255,255,255,255,255,25 
5,255, 188,26,24,9, 128, 17,9,0 
910 DATA 242,248,241,240,162,38,132 
,64,8,34, 133 , 104,252,254,222,9 
920 DATA , , 4 , 1 , , 4 , , , , , , , , 
0, 0,0 

930 DATA 127,63,31,31,31,15,30,30,1 
2,30, 14, 12,4, 1, 1,0 

940 DATA 224,192,128,192,128,0,0,0, 
0,0,0,64,32,0,0,0 

950 DATA 2,0,0,0,64,0,0,0,0,0,0,0,0 
, , , 

960 DATA 126,126,126,252,121,120,48 
,0,0,0,0,0,0,0,0,0 

970 DATA 16,0,80,192,128,0,0,0,0,0, 
0, 0, 0,0, 0, 

980 DATA 16,0,80,192,128,0,0,0,0,0, 
0,0,0, 0, 0,0 

990 DATA 16,0,30,192,128,0,0,0,0,0, 

0,0,0,0,0,0 



TEST DE LISTADOS. Para usar el Test de Lisiado que publicamos al hnal de cada programa debe cargarse el programa corres- 
pondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. 



10 


- 58 


160 


- 58 


310 


- 27 


470 


60 


620 


- 31 


750 


- 58 


900 - 12 


20 


- 58 


170 


- 58 


320 


- 177 


480 


-235 


630 


-183 


760 


-169 


910 - 75 


30 


- 58 


180 


- 58 


330 




490 


- 80 


640 


- 85 


770 


-125 


920 - 33 


40 


-113 


190 


-194 


340 


- 21 


500 


- 98 


650 


-113 


780 


-121 


930 -199 


50 


-168 


200 




350 


-161 


510 


- 83 


660 


-206 


790 


- 43 


940 -157 


60 


- 81 


210 


-21 1 


360 


- 53 


520 


-133 


661 


-105 


800 


-155 


950 - 84 


70 


- 58 


220 


-226 


370 


- 58 


530 


-104 


662 


-238 


810 


- 69 


960 -191 


80 


- 58 


23(ü 


-166 


380 


- 58 


540 


-122 


670 


-179 


820 


- 28 


970 - 94 


90 


- 58 


240 


- 58 


400 


- 1 90 


550 


-107 


680 


- 87 


830 


-157 


980 - ?4 


1-00 


- 58 


250 


- 58 


410 


-118 


560 


-157 


690 


-155 


840 


- 62 


«90 - 94 


1 10 


- 72 


260 


- 58 


420 


- 58 


570 


- 96 


700 


-206 


850 


-189 




120 


-194 


270 


- 58 


4 30 


- 53 


580 


-114 


710 


-246 


860 


- 25 




1 30 


-187 


280 


- 94 


440 


- 58 


590 


- 95 


720 


- 58 


870 


- 34 




140 


-202 


290 


- 39 


450 


- 58 


600 


- 50 


730 


- 58 


880 


-114 


TOTAL: 


150 


- 58 


300 


- 76 


460 


-132 


610 


-107 


740 


- 58 


890 


- 1 


10512 
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Programa 



Por Angeles Picajo 



Barca 



Un programa dedicado a aque- 
llos de nuestros lectores que es- 
tén afiliados al club catalán. 




10 

20 
30 
40 
1 

50 
60 



70 
80 

90 

100 

1 10 

120 

130 

140 

150 

160 

170 

190 



' <C) 1.986 * Angeles * BARSA * 
* 

COLOR 15,1,1:KEY OFF: SCREEN 2:K= 
FOR 1=1 TO 9 

IF 1/2 - K THEN C=6 : K=K+ 1 : GOTO 8 



Olí 

LXN5<0 V 0+R>-(23&,2Í 
R=R+21 
NEXT I 

LINE(0, 190) -(255, 190) , 11 

LINE(0, 191) -(255, 191) , 15 

LINE(0, 191)-(255, 191) , 1 

FOR M=0 TO 500: NEXT M 

h>l:R«0 

FOR 1=1 TO 5 

IF 1/2 = K THEN C=6 : K=K+ 1 : GOTO 



180 C=4 

190 LINE ( 128, 0+R) - (255, 18* I ) ,C,BF 
200 R=R+38 
210 NEXT I 

220 LINE (90, 50) -(165, 123) , 1 , BF 
230 COLOR 15:G0SUB 360 
240 FOR M=0 TO 1000: NEXT M 
250 LINE (0,0) -(120, 12) , 1 , BF 
260 OPEN " GRP : " AS #1 
270 DEFINT P , X , Y , F , A, N, Z 
280 READ A*,Z,P,X,Y 

290 A=2*LEN (A*> : COLOR 15: PRESET (10, 
0) :PRINT#1, A* -.COLOR 15 
300 FOR F=l TO 4*A-1:F0R N=0 TO 6 
310 IF P0INT(F,N)=1 THEN 320 ELSE F| 
RESET (F*X+Z, N*Y+P) : DRAW'c Ir2d51 2u5 
320 NEXT N,F 

330 DATA F.C. BARCELONA- , , 145,2,5 
340 LINE(0.0)-(127, 12) , 1 1 , BF 
350 GOTO 660 
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360 ' 

370 ' *ESCUDO* F.C. BARCELON 



380 ' 

390 CÜL0R4: DRAW'bml 06, 90 S4A0r40fd9 
gdg3 1 2g 1 2g 1 3g 1 3g 1 6h 1 3h 1 3h 1 2h 1 2h3uhu 
9" 

400 DRAW"BMlll,90dl5" 




410 DRAW " BM 1 1 7 90d 17" 

420 DRAW "BM 123, 90d4g3d3f d-F2d4" 

430 DRAW"BM129,90d4-f3d3gdg2d4" 

440 DRAUTBM124, 94er2f ' 

450 DRAW "BM 124, 104f r2e" 

460 DRAW"BM135 !1 90dl7 ,, 

470 DRAWBM141 , 90d 14" 

480 PAINT<109,92) ,4 

490 PAINT<119,92>,4 

500 PAINT (131,92) ,4 

510 PAINT(143,92) ,4 

520 COLORI 1 : DRAW'bml 17,811 4d3r31 3d2 
br5urdbr8bugl 3hu3er3f bd4br2urdbr3r4 
euhl4d2u4r4-f bd4br2urd" 
530 C0L0R8: DRAW'bml 1 1 , 64r 2er3ere-f 2r 
5dl41 18rueu2eu3h3hur3 

540 DRAW"bml22,63d4r4bd514d4bl6u415 
u5r5u4" 

550 RAI NT ( 1 19, 65) , 8 

560 DRAW"Bml26 !1 63r5e2f r-f r3f r5dg4d3f 
d2-f21 16 

570 DRAW"bml29,63dl3rul3" 
580 DRAW"bml33,62dl4ru.l3" 
590 DFAW " b m 1 37 , 63d 1 3r u 1 3 " 
600 DRAW " bm 1 4 1 , 64d 1 2r Li9u3 " 
610 ' 

620 11 * * E M TOEN G * * 
630 ' 

640 COLOR B: DRAW "BM 128, 60r3e2f 2rf r2 
f r4ef d-f d2g3d4f 2d2" : COLOR 4 : DRAW " f 2r 
f g-f g-f 312g2d-f d-fd8gdgdgdglglgl 1 glgl2g 
13g2hg2h2gh212hl3hl3hlhlh3uhuhu9eue 
2u.hl2e2hehere2" : CQL0R8: DRAW " U2EUEU4 
H3U2EUEFR4ER2ERE2F2R5 " 
650 RET.URN 

660 IG*»INKEy*s IF IG** ,, M THEM 640 
670 COLORI 5 , 1, 1 : END 



Test de listados 



TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa corres- 
pondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. 



10 


- 58 


1 10 


-154 


210 


-204 


310 


-218 


410 


-139 


510 


-246 


610 


- 58 


20 


- 58 


120 


-160 


220 


-117 


320 


- 67 


420 


-127 


520 


- 78 


620 


- 58 


30 


- 58 


130 


-148 


230 


- 25 


330 


-254 


430 


-134 


530 


-204 


630 


- 58 


40 


-224 


140 


-195 


240 


-185 


340 


- 96 


440 


- 48 


540 


-180 


640 


- 53 


50 


-191 


150 


-216 


250 


- 81 


350 


- 45 


450 


- 88 


550 


- 87 


650 


-142 


60 


- 27 


160 


-187 


260 


-224 


360 


- 58 


460 


-139 


560 


-232 


660 


-185 


70 


- 76 


170 


-137 


270 


-228 


370 


- 58 


470 


-133 


570 


- 21 


670 


- 18 


80 


-145 


180 


- 71 


280 


-247 


380 


- 58 


480 


-100 


580 


- 16 






90 


-168 


190 


- 32 


290 


-220 


390 


- 55 


490 


-110 


590 


- 20 


TOTAL: 


100 


-204 


200 


-185 




-233 




-131 
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or Benito Carmona Marías 



ANGULO 



La geometría un poco más sen- 
cilla mediante el programa que 
hoy presentamos. Descubre el 
valor numérico de todos los án- 
gulos, sin cálculos complejos ni 
operaciones innecesarias. 



10 

20 
30 
40 
50 
60 
70 
80 



************* *.* ************* 



' * * 

■ * ANGULO * 

' * por * 

' * BENITO CARMONA MACIAS * 

' * * 
? **************************** 

MAXF I LES= 1 : COLOR 1,15, 15:CLS:SCR 
EEN0 : KEYOFF : W I DTH 37 : LOCATE 4 , 4 : I NP 
UT" INTRUCCIONES <S/N)";IN*: 

IN*="s" THENCLS: GOS 
IN*="N" 



OR IN*="n 



90 IFIN*="3" OR 
UB 1340 ELSE IF 
THEN 100ELSE 80 
100 PI=ATN(1)*4 
110 ' **************** 
120 ■ *** PANTALLA *** 
130 ' **************** 
140 GOSUB 490 
150 7 **************** 
160 *** OPCIONES *** 
170 ' **************** 
180 LOCATE 9,21:INPUT0P 
190 IF 0P<1 OR 0P>3 THEN 180 
200 ON OP GOTO 210,830,1610 
210 CLS: PRINT" INTRODUCE EL NUMERADO 
R EN RADS. ": LOCATE 4,5:INPUT A* 
220 A=VAL(A*):IF A<=0 THEN210 
230 CLS 

240 PRINT" INTRODUCE EL DENOMINADOR 
EN RADS": LOCATE 4,5:INPUT B 
250 IF B<=0 THEN 230 ELSEC=A/B 
260 IF R I GHT* < A* , 1 ) =CHR* ( 227 ) THENF 
=PI*C: GOSUB560 ELSE F=C:GOSUB590 



270 
280 
290 
300 
310 
* 

320 
* 

330 
* 

340 

350 



■ *********************** 

' *** VALOR EN G.M.S. *** 
' *********************** 

GOSUB 770 

' ***************************** 
? *** EQUIVALENTE DEL ANGULO ** 
» ****************************-* 

EQ=F:GOSUB730 

' ************************* 




360 
370 



*** VALOR EN RADIANES *** 
************************* 

380 GOSUB 1090 

390 *********************** 

400 ' *** MENU SECUNDARIO *** 
410 * *********************** 

420 CLS: GOSUB 1130 

430 LOCATE 0, 4: PRINT" VALOR: INT <G> 
;CHR*(248) ; INT (M) ; ** INT(S) ¡"" " 
440 LOCATE 4* 20: PR INT "PULSA UNO DE 
ESOS NUMEROS" -.LOCATE 10,22:INPUT O 
450 IF 0<1 OR 0>3 THEN 440 
460 IF 0=3 THEN CLEAR: GOTO 100 
470 ON GOSUB1190,620 
480 I F I NKEY*= " " THEN 480 ELSEO=0:SCF 
0:GOTO 390 
' *** PANTALLA *** 
CLS:' *** MENU PRINCIPAL *** 
LOCATE 10,0:PRINT"MENU PRINCIPA 



EEN 
490 

300 
10 

L" 

520 

DS. 



LOCATE 4, 5: PRINT" 1- 
A G.M.S. " 



PASAR DE RA 
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Programa 




530 LOCATE 4, 10: PRINT"2- PASAR DE G 
.M.S. A RADS . " 

540 LOCATE 4, 15: PRINT"3- FIN":LOCAT 
E4, 19:PRINT"PULSA UNO DE ESOS NUMER- 
OS" 



RETURN 

' OPERACIONES 
G«C*180 
RETURN • 
' OPERACIONES 
G=C*180/PI 
RETURN 

' REPRESENTACION 



2 



GRAFICA DEL AN 



PRE 



550 
5Ó0 
570 
580 
590 
600 
610 
620 
GULO 

630 SCREEN 2 

640 LINE<69,98)-<188,98) , 10 
650 LINE(128,3S)'-(128, 158) , 10 
660 CIRCLE(128,98) ,60, 1 
670 CIRCLE(128,98) ,60, 1,-(EQ) 
680 OPEN "GRP: " AS#1 
690 PRESET (194,90): PR I NT# 1 , " 0tt 
SET ( 1 20 , 25) : PRI NT# 1 , " tt / 2 " : PRESET ( 56 
, 93 ) : PR I NT# 1 , " tt " : PRESET (110,1 60 ) : PR 
INT#1, "3tt/2 m : PRESET ( 194, 100) :PRINT# 
1,"2tt" 

700 PRESET (14, 170) : PRI NT#1, "PULSA U 
NA TECLA PARA REGRESAR " : PRESET (41,1 
80) : PRINTttl , "AL MENU SECUNDARIO" 
710 CLOSE #1 
720 RETURN 

730 ' *** EQUIVALENTE DEL ANGULO ** 
* 

740 
750 
N 

760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 


900 
910 
920 
930 
940 
* 



FOR V=200 
IFEQ>V*PI 



TO 2 STEP-2 

THEN EQ=EQ-V*P I : RETUR 



NEXT 

REM *** VALOR EN G.M.S. *** 

M=G-(INT(G) ) 

M=M*60 

S=M- (INT(M) ) 

S=S*60 

RETURN 

CLS 

INFUT" INTRODUCE GRADOS" ; G 
IF G<=0 THEN 830 ELSE CLS 
I NPUT " I NTRODUCE M I ÑUTOS " ; M 
CLS: IF M<0OR M>60 THEN 860 
I NPUT" INTRODUCE SEGUNDOS" ; S 
IF S>60 OR S<0 THEN CLS: GOTO 



88 



9 ************************* 
9 *** VALOR EN RADIANES *** 
* ************************* 
GOSUB 1090 

" ***************************** 



950 ' *** EQUIVALENTE DEL ANGULO ** 
* 

I— ^ ^ í| IJt ^ ^f- ^ ^ ^ ^ ^ >^í 7^ 3^í )(C 9|C 1(( jfC .^E í|í 

* 

970 EQ=L: GOSUB 730 
980 ' *********************** 
990 ' *** MENU SECUNDARIO *** 
1000 ' *********************** 

1010 CLS: GOSUB 1130 

1020 LOCATE 0,3: PRI NT "VALOR: " ; L: "RA 
DS. " 

1030 LOCATE 0,6: PR I NT " VALOR : " ; K ; CHR 
*<227> ; " RADS, " 

1040 LOCATE 4, 20: PRI NT "PULSA UNO DE 

ESOS NUMEROS" : LOCATE 10,22: INPUTU 
1050 IF U<1 OR U>3 THEN 1040 
1060 IF U=3 THEN CLEAR : GOTO 1 00 
1070 ON U GOSUB 1190,620 
1080 IF INKEY*="" THEN 1080 ELSE U=0: 
SCREEN0: GOTO 1010 

1090 REM *** VALOR EN RADIANES *** 
1100 R=(G+(M/60)+(S/3600) ) 
1110 L=R*PI/1B0:K=R/180 
1120 RETURN 

1130 ■ *** MENU SECUNDARIO *** 

1140 LOCATE10,0:PRINT"MENU SECUNDAR 

10" 

1150 LOCATE 0,9:PRINT"1- VER SUS RA 
ZONES TRIGONOMETRICAS" 
1160 LOCATE 0, 13: PRINT"2- VER SU RE 
PRESENTACION EN LA": LOCATE 4, 15: PRI 
NT " C I RCUNFERENC I A " 

1170 LOCATE 0, 18:PRINT"3- VOLVER AL 

MENU PRINCIPAL" 
1180 RETURN 

1190 CLS: GOSUB 1290: REM DEFINICION 
DE FUNCIONES INVERSAS 
1200 LOCATE 3, 1: PRI NT "SEN"; CHR* (224 
) - "=" ; SIN (L) 

1210 LOCATE 3 , 4 : PR I NT " COS " ; CHR* ( 224 
) ; "=";COS(L) 

1220 LOCATE 3,7: PRI NT "TAN" ; CHR*'( 224 
) ; "=";TAN(D 

1230 LOCATE 3, 10: PRINT"COSEC" ; CHR* ( 
224) ; "=";C0* 

1240 LOCATE 3, 13: PRINT"SEC" ; CHR* (22 
4) ; "=" ;SE* 

1250 LOCATE 3, 16: PRINT"CTG" : CHR* (22 
4) ; "=";CTG* 

1260 LOCATE 2, 20: PRINT"PULSA UNA TE 

CLA PARA VOLVER AL ME-" 

1270 LOCATE 2, 22: PRI NT "NU SECUNDAR I 

O" 

1280 RETURN 

1290 REM DEFINICION DE FUNCIONES IN 
VERSAS 
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1300 IF SIN(L)=0 THEN CO*=CHR* ( 236) 

ELSE CÜ*=STR*(1/SIN(L) ) 

1310 IF COS(L)=0 THEN SE*=CHR* (236) 

ELSE SE*=STR$U/COS(L) ) 

1320 IF TAN(L)=0 THEN CTG*=CHR* ( 236 

)ELSECTG*=STR*<1/TAN<L) ) 

1330 RETURN 

1340 LOCATE 11,0: PRINT" INSTRUCCIÜNE 
S":REM INSTRUCCIONES 

1350 LOCATE 3, 2: PRINT"Si empre que i 
ntroduzcas un dato" : LOCATE 3,4:PRIN 
T"pulsa RETURN. " 

1360 LOCATE 3,6: PRINT "La letra tt (p 
i) se escribe pulsan- " : LOCATE -3, 8: 
PRINT"do la tecla SHIFT, la tecla C 
ODE,": LOCATE 3, 10: PRINT" y la letra 
P al mismo tiempo." 

1370 LOCATE 3, 12: PRINT"Las abreviat 

uras G.M.S. significan": LOCATE 3,14 

: PRINT" GRADOS, MINUTOS Y SEGUNDOS, 
■i 

1380 LOCATE 3, 16: PRINT"En el numera 
dar puede ir tt o no ": LOCATE 3,18:P 
R I NT" pero en el denominador no pued 
e": LOCATE 3, 20: PRINT" i r . " 
1390 LOCATE 6, 22: PRINT" (PULSA UNA T 
ECLA) " 

1400 IF I NKEY$= " " THEN 1400 ELSE CLS 
1410 LOCATE 3, 2: PRINT "Por ejemplo u 
n ángulo lo dan en ": LOCATE 3,4:PRI 
NT "factor de tt (3tt/4) en este casa 
" : LOCATE 3, ó: PRINT ;| el numerador ser 
i a 3tt, y el deno- ": LOCATE 3, 8: PRINT 
"minador seria 4." 

1420 LOCATE 3, 10: PRINT"E1 signo * s 
e puede omitir, por ": LOCATE 3,12:P 
RINT"e jempl o, en 3tt/4, seria 3*tt/4." 
1430 LOCATE 3, 14: PRINT"En el aparta 
do de pasar de G.M.S. " : LOCATE 3,16: 
PRINT" a RADS. el resultado lo da c 
orno" : LOCATE 3,18: PRINT "un numero o 
un numero muí ti pl i ca-" : LOCATE 3,20: 
PRINT"por tt (pi ) . " 

1440 LOCATE 6,23: PR I NT " ( PULSA UNA T 
ECLA) " 

1450 IF INKEY*=" "THEN 1450 ELSE CLS 
1460 LOCATE 3, 2: PR I NT " Recuerda que 
GRADOS, MINUTOS, SE-": LOCATE 3,4:PR 
INT"GUNDOS Y RADIANES son formas de 
"-.LOCATE 3, 6: PRINT" medir los angul 
os. " 

1470 LOCATE 3, 8: PRINT"Cuando tt (pi) 
vaya sola hay que" : LOCATE 3,10:PRI 
NT"poner un 1 como coeficiente." 
1480 LOCATE 3 , 1 2 : PR I NT " Cuando haya 
una cifra que termi -" : L0CATE3, 14: PR 
INT"en 9 periódica pura o mixta se" 
.■LOCATE 3, 16:PRINT"puede considerar 
como cero. Cuando" : LOCATE 3,18:PRIN 



Especial para nuevos 
usuarios. 

Para que ningún lector 
quede al margen te propo- 
nemos una nueva sección/ 
concurso. 

¡Participa con tu pe- 
queño programa de gráfi- 
cos, sonido, juego o truco! 




1. ° Podrán participar to- 

dos nuestros lectores, 
cualquiera que sea su 
edad. 

2. " Los programas se re- 

mitirán grabados en 
cassettes debidamente 
protegidas dentro de 
su estuche plástico. 

3. ° No se admitirán aque- 

llos programas plagia- 
dos o editados por 
otras publicaciones. 

4. ° Las mejoras a los pro- 

gramas se considerarán 
una aportación al mis- 
mo y se publicarán en la 
sección Línea Directa. 

PREMIOS 

5. " MSX CLUB premiará 

aquellos programas 
publicados con 2.000 
pts. 

6. ° MSX CLUB se reserva 

el derecho de abonar 
los premios en metáli- 
co o su equivalente en 
software, haciéndolos 
efectivos a los 15 días 
de publicados. 

FALLO Y 
JURADO 

7. ° El Departamento de 

Programación actuará 
como jurado y su fallo 
será inapelable. 

8. ° Los programas remi- 

tidos no se devolve- 
rán, siendo destruidos 
aquellos que no sean 
seleccionados. 
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T"una transformación de 59* 59* * se 
■i 

1490 LOCATE 3, 20: PRI NT "puede consid 
erar como un grado mas" 
1500 LOCATE 6 , 23 : PR I NT " ( PULSA UNA 
TECLA) " 

1510 IP I NKEY$= " " 'THEN 1.510 ELSE CL3 
1520 LOCATE 3, 2: PRINT "Solo represen 
ta gráficamente an-": LOCATE 3,4: PR I 
NT "guio positivos y estos gráfica-" 
: LOCATE 3, 6: PRINT" mente son aquello 
s que giran en": LOCATE 3,8: PRINT" 1 a 

circunferencia en sentido con-" 
1530 LOCATE 3, 10: PRINT" trar i o a las 

saetas del reí o -i." 
1540 LOCATE 3, 12¡PRINT"Los ángulos 
negativos son aque- " : L0CATE3 , 14: PRI 
NT" 11 os que giran en sentido igual 
a " : LOCATE 3,16: PRINT" 1 as saetas de 
un reloj. ": LOCATE 3, 18:PRINT M Si el 
ángulo a representar es ma-": LOCATE 

3, 20: PRINT"yor que Í00tr rads. sald 
ra error. 

1550 LOCATE 3 , 23 : PR I NT " ( PULSA UNA T 



ECLA) " 

1560 IF INKEY$=" "THEN 1560 ELSE CLS 
1570 LOCATE 3, 2: PR I NT "Par a evitarlo 
en la linea B10 hay "-.LOCATE 3,4:PR 
INT"que aumentar el primer valor de 
1":L0CATE 3, 6: PRINT"bucl e hasta el 
valor que qui eras ,": LOCATE 3,8:PRIN 
T"pero al sacar los resultados de 1 
a" : 

1580 LOCATE 3, 10: PRINT"tr ansf ormaci 
on y el menú secunda- ": LOCATE 3,12: 
PRINT"rio sera mas 1 ento .": LOCATE 3 
,14:PRINT"E1 signo " ; CHR* (236 ) ; " si 
gnifica infinito." 

1590 LOCATE 3, 23: PRINT" (PULSA UNA T 
ECLA) " 

1600 IF I NKEY*= " " THEN 1600 ELSE CLS 
: RETURN 

1610 ■ *** FIN *** 
1620 CLS.-END 
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TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa corres- 
pondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. 
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-224 


890 


- 31 
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-231 
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- 5 
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-142 
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- 58 
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- 75 


1440 


-115 
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Programa 



iPor Borja López de Lamadrid 



SPEED TURBO 



Borja nos presenta una emocio- 
nante carrera de bólidos en la 
que se necesita algo más que ser 
un experimentado piloto. Apún- 
tate a este gran premio. 



10 REM ############################ 
### 

20 REM BORJA LOPEZ DE LAMADRID 

30 REM PRESENTA: SPEED TURBO 

40 REM ############################ 

### 

50 SCREEN 2, 2 : FOR G=0 TO :C*="" 
:F0RI=1TÜ 32 : READ D* : C*=C$+CHR* ( VA 
L<"&H"+D#) ) : NEXT: SPRITE* (G)=C*:NEX 

60 REM***************************** 
** 

70 REM VARIABLES 

80 REM***************************** 
* * 

90 X= 1 1 : Y= 1 40 : Q= 1 00 : W= 1 9 : H= 1 5 : Q2=9 

: W2= 1 : TT=3 : B= 1 00 : Q3= 1 25 : W3= 1 : B=0 

: 04= 1 25 : W4=--5 : V=6 : T I ME=0 : Q5= 1 49 : W5= 

-70 : Z Z =0 : P=0 : K=0 : L= 1 00 

100 OPEN"BRP: "AS#1 

110 ON INTERVAL=100 GOSUB 830 

120 ON STOP GOSUB 980 

130 STOP ON 

140 INTER VAL ON 

150 COLOR 1,14,15 

160 FOR K=l TO 1 : B*=" " : F0RI=1TQ 32 
: READ A* : B*=B*+CHR* < VAL ( " SdH " +A* ) ) : 
NEXT: SPRITE* (K) =B$: NEXT 
170 ON SPRITE GOSUB 630 
180 REM 
190 GOSUB 790 

200 X = 1 1 : Y= 1 40 : Q= 1 03 : W=-49 : H= J 5 : Q2 
=87 : W2=-58 : TT=3 : B= 1 00 : 03= 1 25 : W3=-65 
: B=0 : 04= 1 35 : W4=-35 : SPR I TEON : C 1 =78 : C 
2=158 



210 
220 
230 
*** 
240 
250 
*** 



REM EMPIEZA 
V=V-1 

REM *************************** 

REM MARCADORES 
REM 



270 
280 



COLOR 1 

PRESET(1,5) :PRINT#1, 
PRESET ( 1 , 1) :PRINT#1, "I 





290 PRESET ( 1 , 10) : PRINT#1 , 
300 COLOR 15 ' 

310 PRESET (9, 6) , 1:PRINT#1, "VIDAS="; 

: PRESET (50,6) :PRINT#1,V 

320 COLOR 1 

330 PRESET (175, 5) :PRINT#1, "| 
340 PRESET (175,1): PR INT# 1 , " I 
350 PRESET (175, 10) :PRINT#1, " 
360 COLOR 15 

370 PRESET (178, 6) , 1 : PRINT#1 , "PUNTOS 

=";: PRESET (225, 6) :PRINT#1,P 

380 REM ************************* 

** 

390 REM MANDOS 

400 REM ************************* 

** 

410 S=STICK(1) 
420 S2=STRIG(1) 

430 W=W+B+6: W2=W2+B+1: W3=W3+B+4: W4= 

W4+B+2: W5=W5+B+7 

440 IF S=3 THEN X=X+8 

450 IF S=5 THEN B=B-1 : PZ=. 1 : IFB< 1TH 
ENB=+1 

460 IF S2=-1THEN B=B+6 :PZ=1 
470 IF S=7 THEN X=X-8 
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480 

490 

500 

510 

520 

** 

530 

540 

** 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690 

700 

710 

720 

730 

740 

750 

760 

770 

* 

780 



IF 5=1 THEN B=B+1:PZ=.5 
IF Y< 0THEN Y=175 
IF X<C1 THEN 630 
IFX>C2THEN 630 
REM *************************** 

REM SPRITES 
REM *************************** 



PUTSPRITE 1 , < X , Y) , 4, 
PUTSPRITE 2, <0,W> , 7, 
PUTSPRITE 3, (02, W2) , 
PUTSPRITE 5, (04, W4) 
PUTSPRITE 4, <Q3,W3) 
PUTSPRITE 6, <05,W5) 
L=L+10: P=P+PZ 
GOTO 410 
REM F I N 
REM 

PUTSPRITE 
PUTSPRITE 
PUTSPRITE 



1 
1 

, 14 
, 13, 



1 

11, 1 
2, 1 



U Y) , B, 1 

2, (Q, W> , 8, 1 

3, (Q2,W2) , 8, 



PUTSPRITE 4, (03, W3> , 
PUTSPRITE 5, (Q4.W4) 



8, 

S, 
8, 



PUTSPRITE 6, (05, W5) 
COLOR 1 

PRESET(224,5) :PRINT#1, 
COLOR 15 

P=CINT(P) 

PRESET ( 225 , 6 ) : PR I NT# 1 , P 

IFV=1THEN900ELSEGOTO 180 

REM *************************** 

REMDEFINICION DE PANTALLA 



790 REM *************************** 
* 

800 LINE (85,0)- (165, 192) , 1 , BF 

810 RETURN 

820 0= 105:03=105 

830 REM ^^^^^^ 

840 P=P+1 :ZZ=ZZ+1:IF ZZ/2=INT ( ZZ/2) 
THEN870 

850 03=03- 1 : Q4=Q4- 1 : 05=05+2 : 02=02-2 
860 0=0+3 :GOTO 890 

870 0=0-3 : 02=02+2: 03=03+1: 04=04+1: 

05=05-2 

880 REM 

890 RETURN 

900 PLAY "L4A2" 

910 GOTO910 

920 REM *************************** 

930 REM, DEFINICION DE PANTALLA 

940 REM *************************** 

950 LINE (105,0) -(145, 192) ,2, BF 

960 Cl=l 12: C2=138 

970 RETURN 

980 COLOR 15,4,7 

990 REM ************************** 
* * 

1000 REM DATAS 

1010 REM ************************** 
*** 

1020 DATA0,0,9,4, 10, A, 4, 9, 4, A, 4, 1,2 
, 0,0, 0, 0, 0, 20, 80, 50, 88, 50, 28, 90, 68, 
80,50,0,0,0.0 

1030 DATA3, 3, B,F, D, 3,3, 2, 2, 2, D, F, D, 
D, 3, 3, C0, C0 , B0 , F0 , B0 , C0 , C0 , 40 , 40 , 40 
, B0,F0, B0,B0,C0,C0 
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Software 



F-l SPIRIT 



Campos» 



INTRODUCCION 

Nos encontramos ante un juego 
de Konami, distribuidora que 
logra impresionar a menudo 
con sus aportaciones al software de 
MSX. Este es otro caso en que lo con- 
sigue, pues nada más conectar el cartu- 
cho comienza el espectáculo. 

La música, nada más oírla, puede ani- 
mar a algún melómano a comprar el 
cartucho, aunque sólo sea para escuchar 
la rítmica música que está sonando a 
través de 8 canales, algo realmente ini- 
maginable. Es la nueva aportación de 
Konami: «El chip de sonido», introdu- 
cido por primera vez en un cartucho en 
el juego «Némesis II», es ahora colocado 
para conseguir la deslumbrante anima- 
ción que da jugar con esta música de 
fondo. 

Además de la música podemos com- 
probar que los gráficos tampoco tienen 
nada que envidiar a otros juegos de ca- 
rreras automovilíticas. 

SELECCION 

Tras la pantalla de presentación apa- 
rece la demostración, que muestra las 
diferentes pantallas a las que podemos 
acceder cuando pulsemos el espacio. Una 
vez pulsado nos aparecen dos opciones: 
«GAME» y «COMAND». Para jugar, 
hemos de pulsar la barra espaciadora 
cuando la flecha señale la palabra 
«GAME». Más tarde ya explicaremos 
para qué sirve la opción «COMAÑD». 

Nos aparecen ahora otras tres opcio- 
nes más, que son: «1 jugador», «2 juga- 
dores» o «Batalla». En la primera op- 
ción, «1 jugador», éste juega contra los 
coches que tiene delante y que debe ir 
adelantando para ganar posiciones. 
Cuando son dos las personas que quieren 
jugar al mismo tiempo, pueden hacerlo 
de dos formas distintas. La opción «2 
jugadores», es toda una innovación que 
introduce Konami en un juego MSX, ya 
que pueden jugar dos personas por su 
cuenta al mismo tiempo, es decir, la 
pantalla se divide para que cada jugador 
juegue independientemente de lo que 
haga el otro. La última opción de este 
apartado es «Batalla», que simula una 
competición en la que se enfrentan los 
dos jugadores entre sí. 

Una vez escogido el número de juga- 



Trepidante juego de carreras automo- 
vilísticas que os pondrá los pelos de 
punta no sólo por sus gráficos, sino 
también por su sensacional sonido. 




F-l SPIRIT destaca por ¡a posibilidad de definir a nuestro gusto los detalles más importantes de nuestro 
vehículo, como puedan ser los frenos, el motor y el cambio de marchas. 



ras que podemos escoger. Al iniciar el 
juego, tenemos para elegir tres tipos de 
carreras, «Carrera de clasificación», 
«Rally» y «Carrera de F3». Se consiguen 
más circuitos aumentando la puntuación. 
Los puntos se consiguen llegando a meta 
entre los 6 primeros, obteniendo así de 
4 a 9 puntos, según la posición de lle- 
gada. 

Este es un cuadro esquemático de las 
pistas y los puntos que son necesarios 
para intervenir en cada carrera: 




dores, aparecen en pantalla las distintas 
opciones de los diferentes tipos de carre- 
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Software 



STOCK-RALLY-F3 
RESISTENCIA-F3000 

Fl Pista 1 

Fl Pista 2,3 

Fl Pista 4,5 

Fl Pista 8,9 

Fl Pista 10,11 

Fl Pista 12,13 

Fl Pista 14,15 

Fl Pista 16 







12 puntos 
25 Puntos 
33 Puntos 
48 Puntos 
84 Puntos 
105 Puntos 
128 Puntos 
153 Puntos 
180 Puntos 



Al cerminar todos los circuitos, el 
jugador es proclamado el mejor con- 
ductor de Fl. 

Una vez escogido el campo de batalla 
no acaban las opciones, pues todavía 
nos queda un sinfín de decisiones que 
pueden determinar la posición al final 
de la carrera. 

DISEÑO DEL COCHE 

Este programa incluye la interesante 
novedad de poder diseñar el coche que 
nos parezca más adecuado para cada ca- 
rrera. Hay tres coches ya preparados que 
aparecen en pantalla. Son coches con 
carrocerías de diversos colores, pesos y 
materiales, motores de distintas poten- 
cias y cilindradas, frenos de tambor o 
discos, transmisiones automáticas o ma- 
nuales y amortiguadores de distintas ca- 
racterísticas. 

Si ninguno de estos vehículos logra 
impresionarnos, podemos realizar nues- 
tro propio diseño. Para ello debemos 
elegir entre 6 motores de distinta poten- 
cia, cilindrada y número de cilindros en 
V. Por ejemplo, el segundo motor suele 
ser poco potente y las aceleraciones y 
velocidad máxima son pobres, pero el 
consumo es muy reducido; en cambio el 
quinto motor es muy potente y con él 
se consiguen grandes aceleraciones y al- 
tas velocidades, siendo el consumo exce- 
sivo, por otro lado. 

Si ya hemos decidido el motor, nos 
toca ahora decidir qué carrocería quere- 
mos montar sobre el motor escogido. 
Hay tres carrocerías de distintos colores 
y pesos. Una carrocería pesada no se 
deteriora con facilidad; pero hace dismi- 
nuir la velocidad y las aceleraciones, y en 
cambio, una carrocería ligera hace que 
las aceleraciones sean eficaces; pero los 
roces con otros vehículos pueden dete- 
riorarla. 

Tras elegir la carrocería, le toca el 
turno a los frenos. Tenemos tres tipos 
distintos a elegir: 

1. Q Frenado débil, pero tiene estabi- 

lidad. 

2. a Mejor potencia de frenado, pero se 



debilitan al hacer uso excesivo 
de ellos. 

3. Q Frenado en seco efectivo, pero se 
desgastan con facilidad por lo que 
quizá sea necesario parar en boxes 
para bombearlos. 
Después debemos escoger la suspen- 
sión para el vehículo, y ésta puede ser 
también de tres tipos: 

1 Q Ofrece giros suaves, y elimina así 
muchos accidentes; pero la veloci- 
dad debe reducirse mucho en las 
curvas. 

2. Q Tiene bastante tacto para eliminar 

accidentes; pero también hay que 
reducir un poco la velocidad en las 
curvas. 

3. Permite tomar curvas a gran velo- 
cidad; pero un leve error significa 
la pérdida de control. 

Finalmente, podemos elegir el tipo de 
transmisión para el vehículo, que pue- 
de ser: 

1. Q Automática: Es recomendable 

para los que todavía no tienen ex- 
periencia con el manejo de las te- 
clas o del joystick, ya que no hay 
que estar pendiente del momento 
oportuno para cambiar de marcha. 

2. Q Es de tipo manual, y se caracteriza 

por tener una buena aceleración en 
velocidades bajas y no tan eficaz en 
altas velocidades. 

3. Q También es de tipo manual, y es 

la inversa de la segunda. Acelera 
poco en velocidades bajas y mucho 
en velocidades altas. 
Todas las transmisiones son de 4 mar- 
chas en todos los circuitos. 

Tras esta última elección, podemos 
rectificar de nuevo todas las opciones, 
por si nos hemos equivocado o no nos 
convence el coche que hemos diseñado 
o escogido. 



PANTALLA DE JUEGO 

Si ya está el coche hecho a nuestra 
medida, ya podemos empezar a jugar. 
Cuando juega un solo jugador, aparece 
en pantalla la parrilla de salida donde se 



encuentra el coche elegido junto a otros 
vehículos que toman la salida al mismo 
tiempo. 

El cuadro de mandos es de lo más 
completo. Aparece un mapa del circuito 
y en todos momento podemos ver me- 
diante una cruz el lugar del circuito en 
que se encuentra el coche. También nos 
indica el número de vueltas que nos 
quedan por recorrer. El coche posee un 
cuentarrevoluciones, de gran utilidad a la 
hora de cambiar de marcha, y un velo- 
címetro, que indica en todo momento la 
velocidad que lleva el coche. Tenemos 
entre los indicadores un marcador que 
nos informa sobre la posición en la ca- 
rrera. Nos informa también la marcha 
que llevamos puesta y hay un indicador 
de combustible que avisa mediante un 
sonido especial en el momento que se 
nos está terminando el mismo. Cuando 
el motor, los frenos o las ruedas están 
averiadas, unas luces destellantes nos lo 
comunican inmediatamente. 

Cuando son dos los jugadores, ya sea 
en batalla o independientemente, los pa- 
neles se reducen; pero los datos e infor- 

En la parrilla de salida encontraremos sólo a unos 
pocos enemigos. Pero delante, en la pista, nos 
esperan mucoos más 
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maciones, son las mismas. 

CONTROLES 

Para controlar el coche podemos uti- 
lizar bien el teclado, o el primer joystick. 
En caso de dos jugadores no es impres- 
cindible este último, ya que los dos jur 
gadores pueden jugar con el teclado. 

JUEGO 

Hemos de ir adelantando al mayor 
número posible de coches para poder 
quedar entre los 6 primeros. A cada 
paso por meta aparece sobreimpresiona- 
do el tiempo que hemos empleado para 
dar la vuelta. 

Si hemos averiado el motor, los frenos 
o las ruedas, o nos queda poco combus- 
tible, debemos parar en boxes. Cuando 
aparece la indicación en la pista, debe- 
mos frenar y arrimar el coche hacia la 
izquierda de la calzada. Al entrar en los 
boxes, la imagen se amplía, y cuando 
hemos detenido totalmente nuestro ve- 
hículo, aparece la dotación de boxes, que 
cargará nuestro depósito de combustible 
y reparará los desperfectos. Aparece un 
cronómetro que cuenta el tiempo de pa- 

Los gráficos son uno de los aspectos más especta- 
culares de este sensacional juego. 



rada en boxes, que se puede reducir pul- 
sando repetidamente la tecla de cursor 
abajo. Cuando son dos jugadores los que 
participan en la carrera, la parada en 
boxes es igual que cuando lo hace un 
jugador; pero no se amplía la imagen. 
Al pulsar la barra espaciadora cuando 
está el coche en boxes, inmediatamente 
cesan las reparaciones y la recarga de 
combustible y puede reanudarse de nue- 
vo la carrera. Si no se pulsa esta tecla, 
al finalizar las reparaciones la dotación 
de boxes nos hace señales para reanudar 
la marcha. 

Al tener un accidente suele averiarse 
alguna parte del coche y reducirse el 
combustible, por lo que si tenemos mu- 
chos accidentes, no sólo conseguimos 
que nos adelanten otros coches, sino que 
podemos quedar descalificados por falta 
de combustible. Es recomendable repa- 
rar con rapidez los desperfectos en el 
coche, puesto que éste ya no responde 
con la misma nitidez con que lo hacía al 
estar en buen estado. 

El juego tiene pequeños fallos de pro- 
gramación que resultan un poco incómo- 
dos. Cuando hemos conseguido adelan- 
tar hasta la primera posición, nos 
sorprende ver que siguen apareciendo 
vehículos por adelantar. A veces tam- 
bién se adelantan vehículos sin que se 
reste en el cómputo de la posición. Son 
como decimos pequeños fallos que res- 
tan interés por el juego. 

FIN DEL JUEGO 

Este juego tiene el final cuando hemos 
conseguido superar todas las carreras en 
los diferentes circuitos. Pero para acce- 
der a la pista 16 de Fl hemos de con- 
seguir la primera posición en todo^ los 
demás circuitos. De otra forma sería im- 
posible conseguir los 180 puntos nece- 
sarios para acceder a este circuito. Pero 
claro, no nos vamos a pasar jugando toda 
la vida para conseguir de un tirón quedar 
clasificados en primer puesto en todas 
las pistas. Por ello cuando hemos acaba- 
do de jugar en un circuito nos aparece 
la opción «COMAND». Esta opción nos 
conduce a un menú donde figuran los 
siguientes términos: «JUEGO», «CAM- 
BIO», «CONTRASEÑA». «ENTRADA 
DE CONTRASEÑA», «FIN DEL JUE- 
GO». 

La opción «JUEGO», es idéntica a la 
que hemos explicado al principio del ar- 
tículo. 

La de «CAMBIO», se utiliza cuando 
intervienen dos jugadores y el segundo 
quiere que su puntuación se registre en 
forma de contraseña. 

«CONTRASEÑA», es la opción que 
transforma la puntuación en un código 
de 24 letras que debemos apuntar e in- 
troducir cuando queramos volver a jugar 



de nuevo. 

La «ENTRADA DE CONTRASE- 
ÑA», es la opción que debemos utilizar 
cuando queramos volver a jugar e intro- 
ducir la contraseña de nuestra puntua- 
ción. Si nos hemos equivocado al intro- 
ducir una letra, aparece «CONTRA- 
SEÑA ERRONEA», pero podemos 
intentarlo tantas veces como que- 
ramos. 

La última opción es la de «FIN DEL 
JUEGO», y se utiliza cuando queremos 
empezar el juego desde el principio, por- 
que de lo contrario siempre memoriza la 
puntuación obtenida. 

Junto a las opciones de «JUEGO» y 
«COMAND», aparece la opción «PRO- 
BAR DE NUEVO» sólo cuando ya he- 
mos terminado algún circuito. La pode- 
mos utilizar para acceder a la carrera que 
hemos acabado sin tener que volver a 
diseñar el coche. 

TECNICAS 

Para obtener el máximo rendimiento 
del coche es necesario hacer buenos cam- 
bios de velocidad. Observando el cuen- 
tarrevoluciones, cuando éste llegue a la 
zona roja, es el momento justo de cam- 
biar de velocidad. 

Hay que fijarse en todas las piezas de 
los coches, motores, frenos, suspensio- 
nes, carrocerías, para obtener el mayor 
rendimiento posible. Cada motor tiene 
sus características propias que pueden 
ser utilizadas para sacar el máximo pro- 
vecho de todos ellos. 

Sin duda alguna la clave del juego es 
cómo se toman las curvas. Debe reducir- 
se la velocidad y atacarlas desde fuera. 
Después se debe acelerar y girar. 

El tiempo en boxes debe ser lo más 
corto posible, para evitar perder dema- 
siadas opciones. Por ejemplo, no llena- 
remos el depósito cuando sólo nos quede 
una vuelta para terminar la carrera. 

Si el coche derrapa durante la carrera, 
el giro del volante hacia la dirección en 
que derrapa lo parará. 

En las carreras «RALLY», se deben 
utilizar los derrapes para cambiar de di- 
rección. 

VALORACION 

En general, el juego está bien realiza- 
do, y a pesar de los pequeños fallos antes 
comentados, podemos considerarlo 
como un muy buen juego. Es bastante 
entretenido, aunque se hace un poco pe- 
sado al cabo de muchas horas de juego. 
Los gráficos y el movimiento son buenos 
y utiliza muchos sprites a la vez en 
pantalla. La música, como hemos co- 
mentado al principio es algo soberbio 
y casi increíble para un ordena- 
dor MSX. 
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Hardware 



por Juan Ortega *bh 



MODEMS: QUE SON Y PARA QUE SIRVEN 

. ■ 




1. RESUMEN SOBRE LA IN- 
TERFAZ RS-232 

CComo sabemos, la intertaz serie Rs- 
232 nació con la idea de interconectar 
dos dispositivos de tratamiento de 
datos diferentes a través de una línea de 
comunicación; o sea, que lo que conectaba 
directamente era un equipo terminal (DTE), 
con un equipo de comunicaciones (DCE). 

Se definieron además una serie de conexio- 
nes standard para llevar a cabo la intercomu- 
nicación de una forma universal. 

Esto no ha sido estrictamente respetado, lo 
cual ha llevado a un cúmulo de confusiones, 
por lo que huelga extendernos en diferentes 
interpretaciones del standard RS-232. 

2. CONEXIONES RS-232 
STANDARD 

Dado que el standard RS-232 se utiliza en 
la actualidad, tanto para unir un equipo de 
tratamiento de datos con uno de comunica- 
ciones, como para unir dos equipos de tra- 
tamiento de datos entre sí, surgen dos modos 
generales de conexión (OJO, esto es una 
generalización; el autor no se hace respon- 
sable del funcionamiento incorrecto de una 
conexión particular). 

Resumamos las asignaturas standar de los 
pines, e indiquemos las dos interconexiones 
más típicas: 

1 — MASA DEL CHASIS 

2 — DATO TRANÍ 

3 - DATO RECIBID 
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4 - 

5 - 

6 — 

7 - 

8 - 
20 — 

22 - 



SOLICITUD DE ENVIO 
SOLICITUD DE ENVIO RECIBIDA 
CONJUNTO DE DATOS PRE- 
PARADO 
MASA DE SEÑAL 
DETECTOR DE PORTADORA 
TERMINAL DE DATOS PRE- 
PARADO 

INDICADOR DE LLAMADA 



- TD (TRANSMIT DATA) 



— (RECEIVE DATA) 

— RTS (REQUEST TO SEND) 

— CTS (CLEAR TO SEND) 

— DSR (DATA SET READY) 

— DCD (DATA CARRIER DETECT) 

— DTR (DATA TERMINAL READY) 

— RI (RING INDICATOR) 

Si interconectamos un equipo terminal de 
datos (DTE) con un equipo de comunicacio- 



i 



nes (DCE) sería como sigue: 
LADO DTE 



1 

2 (TD) - 

3 (RD) - 

4 (RTS) 

5 CTS) 

6 (DSR)' 



1 

- 2 (TD) 

- 3 (RD) 
-4 (RTS) 

- 5 (CTS) 
-6(DSR) 



8 (DCD) — 
20 (DTR) — 
22 (RI) 



- 8 (DCD) 
20 (DTR) 

- 22 (RI) 



Si ¡nterconectamos dos equipos de datos 
(siempre generalizando, dado que a veces no 
se usan todas las señales, con lo cual habrán 
variaciones), sería como sigue: 



LADO DTE 



LADO DCE 



1 

2(TD) 
3(RD) 

4 (RTS) 

5 (CTS) 

6 (DSR) 




2 (TD) 

3 (RD) 

4 (RTS) 

5 (CTS) 

6 (DSR) 



8 (DCD) • 
20 (DTR) 
22 (RI) — 



- 8 (DCD) 
20 (DTR) 

— 22 (RI) 



De un vistazo general, observamos que hay 
algunas señales cruzadas y otras que conser- 
van el paralelismo; pero si fijamos más nues- 
tra atención notaremos que las que conser- 
van la conexión son aquellas típicas y 
exclusivas de un equipo de comunicaciones, 
a saber: 

RING INDICATOR — Super-propio de 
comunicaciones. 

DETECCION DE PORTADORA — To- 
davía no sabemos lo que es, pero créanme 
que es propio de ciertos equipos de comuni- 

Para centrarnos en el tema de MODEMS, 
pasemos al punto siguiente. 

3. ¿QUE ES UN MODEM? — 
LA LINEA TELEFONICA 

Cuando surge la necesidad de intercambiar 
datos entre dos lugares distantes, nos plan- 
teamos dos posibilidades: 

A Tender una línea entre ambos puntos 
(línea dedicada. 

Método muy caro, salvo que la intimidad 
o la seguridad de los datos lo requieran 
inexcusablemente. ) 
B Utilizar alguna línea ya existente (por ej. 
la línea telefónica conmutada). 
Método más barato, pero también con sus 
problemillas. 

En cualquiera de los dos casos, y dado que 



la distancia sería grande, los datos necesita- 
rían un tratamiento para evitar su degrada- 
ción con la distancia. 

Para efectuar este tratamiento de las seña- 
les se desarrolla un aparatito llamado 
MODEM. 

¿Pero por qué hace falta un aparatito? 

Siempre hace falta cuando la distancia su- 
pera determinados límites, pues las señales 
digitales se degradan y llegarían ininteligi- 
bles al otro lado. 

Además y en el caso de utilizar la línea 
telefónica «conmutada» (la cual va a través 
de centrales conmutadoras a base de relés), 
la degradación posible de la señal es mucho 
mayor, y más si pensamos que dicha línea 
telefónica para transmitir simplemente 
la voz. 

Una forma de solucionar este problema es 
«modulando» dichos datos (al modo y ma- 
nera de como emiten las emisoras de radio). 
Para ello, al otro extremo es necesario «de- 
modular» (efecto contrario) los datos ante- 
riores. 

De ahí la palabreja MODEM (MOdulador- 
DEModulador), ya que el aparatito en cues- 
tión realiza ambas labores (modula lo que 
envía y demodula lo que recibe), ya que, 
puestos a hacer las cosas bien, podemos po- 
nerlo todo en un solo aparato. 

Sale del alcance de este artículo el exten- 
dernos en cómo se MOdula y se DEModula, 
por lo que no entraremos en más detalles. 

4. CONEXION AL MODEM 
MEDIANTE RS-232 

Huelga decir que un MODEM es un DCE 
(equipo de comunicación) típico, por lo que 
remítase el lector al apartado 2, donde se ve 
que la conexión es tal cual (PIN a PIN). 

5. COMUNICACION ME- 
DIANTE MODEM 

Sabemos, pues, que el MODEM se conecta 
entre nuesto equipo de tratamiento de datos 
(digámosle ordenador) y la línea telefó- 
nica. 

Lo que perseguimos con su uso, es el co- 
nectarnos con otro ordenador e intercambiar 
datos (¿o no?). 

Resumamos el proceso: 

— El ordenador «A» quiere conectarse 
con el «B». 

— Cada uno de ellos se puede conectar a 
la línea telefónica como si de hablar se 
tratara. 

— El «A» debe descolgar el teléfono y 
esperar tono. 

— Luego debe marcar el número del «B». 

— Cuando el «B» conteste y le 



— Podrá el «A» empezar a enviar da- 
tos y ... 

— Cuando haya terminado, informar a «B» 
que cuelgue. 



— Y el «A», a su vez, colgar para dejar 
libre la línea. 

Así escrito parece complejo, pero no es ni 
más ni menos que lo que hacemos cada vez 
que queremos hablar por teléfono con 
alguien. 

6. CARACTERISTICAS DE- 
FINITORIAS DE UN MO- 
DEM 

Una vez más nos introducimos en el mun- 
do de lo «NUNCA NADA UNIVER- 
SAL». 

Dado que existen gran cantidad de pará- 
metros, cada ingeniero podría diseñar un 
MODEM totalmente propio y que nunca 
sería capaz de entenderse con otro de dife- 
rente diseño. 

Básicamente existen dos STANDARDS, el 
uno desarrollado en USA por BELL Labora- 
tories, y el otro establecido en EUROPA por 
la comisión de estandarización; dentro de 
cada uno de ellos existen unas subdivisiones, 
según velocidades de transmisión, y otros pa- 
rámetros. 

7. MODEMS MAS O MENOS 
INTELIGENTES 

En un principio, los MODEMS eran total- 
mente manuales; ¿qué significa esto?; 
veamos... 

Según hemos visto anteriormente, para 
establecer una conexión hemos de efectuar 
una serie de pasos (desde marcar hasta col- 
gar), que pueden llegar a hacerse tediosos. 

Un MODEM totalmente manual, lo único 
que es capaz de hacer es «MOdular y DEMo- 
dular los datos», pero todo el resto (estable- 
cimiento de conexión, selección de paráme- 
tros, etc.), debe hacerlo el usuario. 

Qué bonito sería si el propio MODEM 
fuera capaz de ayudarnos y evitarnos aunque 
fuera parte de este trabajo; de aquí surgen 
los MODEMS más o menos INTELI- 
GENTES. 

Para que un MODEM sea algo inteligente, 
ha de ser capaz de entender, al menos, ciertas 
instrucciones que se le puedan dar, por ejem- 
plo, desde un ordenador; surge aquí otro 
problema de «standarización»; ¿quién decide 
cómo codificar las instrucciones? 

8. FIN Y HASTA LA PRO- 
XIMA 

Dado que nos queda bastante por terminar 
de explicar mínimamente los entresijos de 
un MODEM, dejamos para un próximo ca- 
pítulo el tema de los diferentes standards, 
mayor o menos cerebro de los dichosos MO- 
DEMS, etc. 

Así pues, próximamente, seguimos con el 
tema. 

* Director Técnico de 2MEGA, S. L 
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Video-Pokes 



por Miguel Angel Vila 



Ayuda a tu gracioso personaje a 
comer todas las frutas, pero cui- 
dado con los monstruitos malos 
que como te cojan te quitarán una vida. 
Aquí te damos el cargador para vidas y 
trampas infinitas con el cual te harás el 
record en este antiguo pero buen juego. 

10 'CAR6AD0R - FRUIT PANIC 
20 'POR MIGUEL A. VILA * 
30 'PARA HSX-CLUB 

40 COLOR 15,1,1: CLS: KEYOFF: POKE Mtf 
CAB.l 

50 FOR MHFE00 TO &HFE0D 
60 READ A$:P0KE I.VALI'W+A*) 
70 NEXT 

80 LOCATE 2,10:INPUT "QUIERES VIDAS 
INFINITAS (S/N) ';V$ 
90 IF V$*'S" THEN POKE fcHFE01,0 
100 CLS: LOCATE 0,10:INPUT "QUIERES 
TRAMPAS INFINITAS (S/N)';T$ 
110 IF T$="S" THEN POKE kHFE06,0 
120 CLS: LOCATE 5,10:PRINT " LOAD I NG 
FRUIT PANIC ..." 
130 CLEAR 0,*HB7FF 
140 BLOAD 'CAS:' 
150 DEFUSR*lHFE00:A*USR(0) 
160 DATA 3E,35,32,31,9F,3E,3D,32,62 
,A8,C3,A2,B3,00 



I 




Tbe Wall 



THE WALL 

The Wall es otro juego más de 
Erbe en el que tu misión es ayu- 
dar a un simpático marciano que 
aterrizó al final de un gran muro en 
medio del- mar. 

Tu misión consiste en hacer llegar al 
marciano a su nave, es bastante difícil ya 
que camino a la nave, hay muchos obs- 
táculos, entre ellos hay flechas, ruedas, 
mejillones y un gran etcétera. 

Para acabar el juego posees ocho vidas 
y un tiempo limitado para cada pantalla, 
pero por si no eres un gran jugador en 
este juego teclea el siguiente cargador el 
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cual te dará opción a número de vidas 
y pantallas, también de dará opción de 
tiempo ilimitado. 

3 CLS: KEY OFF'POR H.A. VILA 

4 BLOAD "CAS:" 

5 CLS:INPUT "CUANTAS VIDAS (1-255) 
■;V:P0KE iHA401,V 

6 CLS:INPUT "QUIERES TIEMPO INFINXT 
(S/N) ";T$: IF T$='S" THEN POKE &H 
A2F1,0 

7 CLSsINPUT "PANTALLA INICIAL (1-22 
) ";P:PQKE iHA442,P 

8 DEFUSR«MB572:A»USR(0) 



BUBBLER 



B 



ubbler es una de las últimas no- 
veda4es de Erbe. El juego está 
compuesto de cinco fases, para 



tellas o bubblers que encuentres por el 
camino. 

Dispones de 4 vidas y para defenderte 
dispones de un disparo parecido a unas 
bolas de fuego que arrasan con todo lo 
que se pone en su camino, ten cuidado 
con el movimiento ya que es muy com- 
plicado. 

Es habitual en todos los juegos de 
Ultímate ver ese gran efecto tridimen- 
sional. Sumad uno más en vuestra cuen- 
ta, ya que este juego también lo tiene. 

Seguidamente te damos el cargador, 
teclearlo, carga tu cinta original y disfru- 
ta de las cinco fases que tiene este juego. 



lf ' CARGADOR BUBBLER 

21 'POR NIGUEL A. VILA 

30 'PARA HSX-CLUB 

41 COLOR 15, 1,1: CLS: KEY OFF 

50 LOCATE 7,8:PRINT a HSX CLUB - CAR 

6 ADOR" 

61 LOCATE 13,lf:PRINT "BUBBLER* 

70 BLOAD 'CAS:' 

81 POKE WE0DE.IHD9 

90 FOR I*iHD900 TO IHD90D 

100 READ A* : POKE I,VAL("&H"+A$) 

110 NEXT 

120 DEF USR*tHE000:A:USR(0) 

130 DATA 3E,0,32,C8,BB,3E,0,32,0,C7 

,C3,0,40,0,0 



¡¡COMPLETA TU HEMEROTECA DE PROGRAMAS!! 




Ufe ^ 



N.° 26- 225 PTAS. N.° 27 - 225 PTAS. 

Ese 




B- ■ i 




N.° 28 - 225 PTAS. N.° 29 - 225 PTAS. N.° 30-31 - 450 PTAS. N.° 32 - 225 PTAS. 



Im 
auacMsoiMso 



'.í'ICKEBfSH 



«¡«•.•.•iO' ?;.•>•••>; 



N.° 33 - 275 PTAS. N.° 34 - 275 PTAS. N.° 35 . 275 PTAS. 



WOGMIltó 

MANHATTAN SOfT 

'' ' 

fXClUSWA'MAPACOMP 



N.° 36 - 275 PTAS. 




N." 37 -275 PTAS. 




SI TE HACE FALTA ALGUN NUMERO DE PIDELO HOY MISMO! 



i 

Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el cu- 
pón y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 

I BOLETIN DE PEDIDO , 

Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

I gastos de envío, por lo que adjunto talón n.° del Banco/Caja I 

| por el importe de ptas. al portador barrado. 

I NOMBRE Y APELLIDOS I 

| CALLE N.° CIUDAD 41 . 

J3P PROVINCIA TEL 




LOS JUEGOS MAS ESPERADOS 




RAMBO l-RAMBO II 

El juego más vendido 



ROLLERBALL 



PIG MOCK 




Revive la emoción de los flippers de antaño Ayuda a nuestro pobre cerdito en apuros El más atractivo juego de salón ahora en El arcade que pone a prueba tu 

imaginación 




fe ^ V 





msx ROM 




EGGERLAND 



7WECTEURZ 



EGGERLAND 2 

Versión MEGA-ROM del popular juego 
MSX. 




MR.CHING 

Un clásico del MSX 



HOLE IN ONE SPECIAL (MSX-2) 

Atrévete con un GREEN de un Mega-ROM 



HOLE IN ONE PROFESIONAL 




«UStC EOtTOR "MUE" / '/) 



PLANETA MOBIL 

( Te atreverás a combatir en el siglo xxi 



DUNKSHOT 

lO ultimo en juego de basket 



El más popular juego de golf 
















«Ame i orre* 






_ 





INSPECTEUR Z 

Ayuda a Z a recuperar un importante 
documento robado 



MSX ROM PROGRAMME EDUCA! 




MUSIC EDITOR "MUE" 

El único editor musical realmente 
profesional 



GRAPHIC EDITOR • EDDY II 

El editor gráfico esperado por todos 



CALCUL 

Hacemos de los números un juego 



PIDELO A TU DISTRIBUIDOR LOCAL ¡¡YA!! 



Importado y distribuido por SOFT Pje. Llovera n.° 5. At. D. 08021 Barcelona. Tels. (93) 417 69 75 - 322 76 03. Telex 99 352 



